:How to insert a column in a data frame
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}}