comparison GEO/getGEO.R @ 8:0647e033c218 draft

Uploaded
author testtool
date Tue, 28 Feb 2017 05:06:41 -0500
parents 5231cb49c63b
children 19ea355e26b3
comparison
equal deleted inserted replaced
7:5231cb49c63b 8:0647e033c218
48 48
49 } else { 49 } else {
50 gmSet <- Table(getGEO(TAB$ID, getGPL = FALSE)) 50 gmSet <- Table(getGEO(TAB$ID, getGPL = FALSE))
51 } 51 }
52 52
53 write.table(gmSet, Data_Table, row.names = FALSE,quote=FALSE,sep="\t")
53 54
54 write.csv(gmSet, Data_Table, row.names = FALSE, sep = "\t")