字符串切割用于对某个字符串进行切割,从而获得列表元素
切割后的数据输出到文件中
GENES = "ABLIM1, ACTN1, AIF1, APBA2, APEX1, ARHGAP45, ARHGEF18, ATM, BACH2, BEX4, C1orf162, C1orf228, C6orf48, CA6, CAMK4, CCR7, CD248, CD55, CEP68, COQ8A, DGKA, EEF2, EIF3E, EIF3L, EPHX2, EXOSC8, FAM102A, FAM117B"
Gene = strsplit(GENES,split = ",", perl = FALSE, useBytes = FALSE) #strsplit分割字符串
class(Gene) #生成列表
Gene = as.data.frame(Gene)
write.table(Gene,sep = "\t",col.names = "基因",file = "C:\\Users\\admin\\Desktop\\Company-Granulocyte cell.xls") #输出xls文件