Mercurial > repos > testtool > geo_data
diff GEO/getGEO.R @ 9:19ea355e26b3 draft
Uploaded
author | testtool |
---|---|
date | Tue, 28 Feb 2017 05:11:54 -0500 |
parents | 0647e033c218 |
children |
line wrap: on
line diff
--- a/GEO/getGEO.R Tue Feb 28 05:06:41 2017 -0500 +++ b/GEO/getGEO.R Tue Feb 28 05:11:54 2017 -0500 @@ -23,7 +23,7 @@ MetaData <- data.frame(Meta(GEODataTable)) - write.csv(MetaData, protocol, row.names = FALSE, sep = "\t") + write.table(MetaData, protocol, row.names = FALSE, sep = "\t") } hm450.hg19 <- getPlatform() @@ -36,7 +36,7 @@ ) -write.csv(IlmnInfo, platform, row.names = FALSE, sep = "\t") +write.table(IlmnInfo, platform, row.names = FALSE, sep = "\t") if (length(TAB$ID) > 1) {