Question

当mod出现时，我必须为每个数据框分割列|的内容。在下面找到我的代码。我想使用lapply但它不起作用。其他建议仍然没法

prot<-rep('AAAA', times=5)
mod<-c("[5] C(+57.02)", "[5] C(+57.02|[5] C(+57.02))", "[5] C(+57.02)", "[55] C(+57.02|[55] C(+57.02))", "f36")
FramA<-data.frame(prot, mod)
FramA["mod"] <- lapply(FramA["mod"], as.character)
outdm<-list(FramA, FramA)
somelistmod <- lapply(outdm, function(x) strsplit(outdm[[x]]$mod, split = "\\|"))

这是我得到的错误

Error in outdm[[x]] : invalid subscript type 'list'
Called from: strsplit(outdm[[x]]$mod, split = "\\|")
Browse[1]>

Answer 1

如果我们使用匿名函数调用，那么我们可以提取＆＃39; mod＆＃39; x$mod或x[["mod"]]的列。在这里，我们循环遍历list＆＃39; outdm＆＃39;这是list的{{1}}。匿名函数data.frame表示data.frame对象

使用lapply处理列表内容

1 个答案: