comparison getGSMdata/.Rhistory @ 28:c1bf6f112a19 draft

Uploaded
author testtool
date Mon, 20 Mar 2017 06:58:17 -0400
parents 5e1d49abfc99
children
comparison
equal deleted inserted replaced
27:fd7bfd438a65 28:c1bf6f112a19
13 colnames(samples)[which(names(samples) == "accession")] <- "ID" 13 colnames(samples)[which(names(samples) == "accession")] <- "ID"
14 colnames(samples)[which(names(samples) == "title")] <- "Phenotype" 14 colnames(samples)[which(names(samples) == "title")] <- "Phenotype"
15 write.table(samples, GSMTable, row.names = FALSE, sep = "\t",quote = FALSE) 15 write.table(samples, GSMTable, row.names = FALSE, sep = "\t",quote = FALSE)
16 write.table(samples, file=GSMTable.txt, row.names = FALSE, sep = "\t",quote = FALSE) 16 write.table(samples, file=GSMTable.txt, row.names = FALSE, sep = "\t",quote = FALSE)
17 write.table(samples, file="GSMTable.txt", row.names = FALSE, sep = "\t",quote = FALSE) 17 write.table(samples, file="GSMTable.txt", row.names = FALSE, sep = "\t",quote = FALSE)
18 ??entrez_summary
19 ??getGEO
20 ??bumphunter
21 ??annotatePeak