R语言读入gmt格式后转换为list

2023-01-31 本文已影响0人 yingyonghui

gmt <- readLines('xxx.gmt')
gmt <- strsplit(gmt, "\t")
names(gmt) <- vapply(gmt, function(y) y[1], character(1))
gmt <- lapply(gmt, "[", -c(1:2))