Search Archives

Hello! The overall goal I have is taking a large data frame and splitting it into several smaller data frames (preserving column headers) which I can save as txt files to feed into my APACHE ANY23 server for conversion into...

This is what I ran: > drop_token1<-function(x) { + return(paste(x[2:length(x)],sep=".")) + } > for(affdf in 1:length(out)) { + names(out[[affdf]])<-lapply(unlist(strsplit(names(out[[affdf]]),"[.]")),drop_token1) + write.csv(out[[affdf]],file=paste("affymetrix...

Very close! The header now looks like this: c("10", "11", "1_", "HuEx", "1_0", "st", "v2", "", "CEL") For some reason, it's not concatenating. Best, Christian T. Stackhouse | Graduate Student GBS Neuroscience Theme Department of Neurosurgery Department of Radiation...

I re ran it and this is what I got: 11.1_.HuEx.1_0.st.v2..CEL Should be: 10.11.1_.HuEx.1_0.st.v2..CEL Christian T. Stackhouse | Graduate Student GBS Neuroscience Theme Department of Neurosurgery...

Thank you, Jim. I got this error returned: Error in strsplit(names(out[[affdf]])) : argument "split" is missing, with no default Christian T. Stackhouse | Graduate Student GBS Neuroscience Theme Department of Neurosurgery Department of Radiation Oncology UAB | The University of...

Jim, I wanted to thank you for your help and let you know I came up with a very simple solution to the header issue. I made a vector of the original header names before the split and fed that...

Jim, It worked! It wrote out the files, but unfortunately, it didn't work for the file headers. I should have mentioned this is what the headers look like: X0.Classical.10.11.1_.HuEx.1_0.st.v2..CEL...

I ran: drop_token1<-function(x) { return(paste(x[2:length(x)],sep="",collapse=".")) } for(affdf in 1:length(out)) { names(out[[affdf]])<-lapply(strsplit(names(out[[affdf]]),"[.]"),drop_token1) write.csv(out[[affdf]],file=paste("affymetrix",affdf,".txt",sep...