[R] appending collums in for loop
Who Am I?
s1008701 at student.hsleiden.nl
Mon Mar 21 13:36:27 CET 2011
Hoi All,
I am trying to append collums to a data frame in a for loop. I read in
tables, do some processing and then write the result to a data.frame. But,
the thing I want is, that the results are appended to the data frame in
stead of overwriting the results of the prevous table.
It has to look something like this:
After going trough the loop once:
Array 1
1
2
3
4
5
After going trough the loop twice:
Array 1 Array 2
1 1
2 2
3 3
4 4
5 5
After going trough the loop three times:
Array 1 Array 2 Array 3
1 1 1
2 2 2
3 3 3
4 4 4
5 5 5
This is my code:
setwd("J:/Stage/Datasets2/Datasets/outData")
masterTable<-read.table("AR1000900A_N_241110_(Mapping250K_Nsp)_2,Mapping250K_Nsp,CNprobes.tab
_SNP_IDs.xls",sep="\t", dec=",", fill=T, header=T)
masterTable<-data.frame(masterTable)
fileNames<-list.files(getwd(), pattern='_0,5 -0,51.xls')
regionMatchABCDE<-data.frame()
for(i in 1:5) {
fileName <- fileNames[i]
newFile <- file.path(getwd(), paste(fileNames[i], "samen_0,5
-0,51.xls"))
snpidFile<-read.table(fileNames[i],sep="\t", dec=",", fill=T, header=T)
snpidFile<-data.frame(snpidFile)
regionMatch<-cbind(masterTable, masterTable[match(masterTable$Pos,
snpidFile$Pos),])
regionMatchABCDE<-cbind(regionMatch[,10:18])
}
write.table(regionMatchABCDE, file= "Array 0-1-2-3-4-5.xls", col.names=T,
row.names=F, quote=F, sep = "\t")
Thanks!
--
View this message in context: http://r.789695.n4.nabble.com/appending-collums-in-for-loop-tp3393446p3393446.html
Sent from the R help mailing list archive at Nabble.com.
More information about the R-help
mailing list