On 18/02/2009, at 12:51 PM, Laura Rodriguez Murillo wrote:
Hi dear list,
I wonder if somebody can help me with this. I have a text file with
300 rows and around 300000 columns and I need to insert a column that
has the number 1 in every row. This new column should be placed
between columns 6 and 7.
As an example: I would want to insert a column (consiting just of the
number 1 in every row, as in column 6) between columns 6 and 7.
847 847 0 0 2 1 G G T C A G T T C G A C C C G C A A A G G G G A C A
T T
847 847 0 0 2 1 G G T C A G T T C G A C C C G C A A A G G G G A C A
T T
847 847 0 0 2 1 G G T C A G T T C G A C C C G C A A A G G G G A C A
T T
847 847 0 0 2 1 G G T C A G T T C G A C C C G C A A A G G G G A C A
T T
847 847 0 0 2 1 G G T C A G T T C G A C C C G C A A A G G G G A C A
T T
847 847 0 0 2 1 G G T C A G T T C G A C C C G C A A A G G G G A C A
T T
So the new table would look like this:
847 847 0 0 2 1 1 G G T C A G T T C G A C C C G C A A A G G G G A C
A T T
847 847 0 0 2 1 1 G G T C A G T T C G A C C C G C A A A G G G G A C
A T T
847 847 0 0 2 1 1 G G T C A G T T C G A C C C G C A A A G G G G A C
A T T
847 847 0 0 2 1 1 G G T C A G T T C G A C C C G C A A A G G G G A C
A T T
847 847 0 0 2 1 1 G G T C A G T T C G A C C C G C A A A G G G G A C
A T T
847 847 0 0 2 1 1 G G T C A G T T C G A C C C G C A A A G G G G A C
A T T
You can also look at this problem as duplicating column 6.
(1) y <- cbind(x[,1:6],clyde=rep(1,300),x[,7:ncol(x)])
(2) y <- as.data.frame(c(x[1:6],list(clyde=rep(1,300)),x[7:length(x)]))
where x is your original data stored as a matrix or data frame in
method (1),
and as a data frame in method (2), and y is the new data set with the
extra
column of 1's.
Or, if you really are just duplicating column 6:
y <- x[,c(1:6,6,7:ncol(x))]
names(y)[7] <- "clyde" # For consistency with other methods.
These work with your toy example. I haven't tried them out with data
sets of
the size of your real data set.
cheers,
Rolf Turner
######################################################################
Attention:\ This e-mail message is privileged and confid...{{dropped:9}}
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
