我有一个存储142个数据帧的列表 我已将它们的名称提取到矢量
中d.names [1] [1]“ACQ_C.XPT”
我使用了一个函数来创建一个真/假向量，其中包含我希望保留或丢弃的每个数据框中的变量列表
D1 [1] $ ACQ_C.XPT SEQN ACD010A ACD010B ACD010C ACQ020 ACQ030 ACD040 ACQ050 ACQ060 ACD070 ACD080 真假，错误，错误，错误，错误，错误，错误，虚假
我希望迭代地沿着数据框列表向下创建数据框，其中只包含在向量d1中标记为true的那些变量
lapply(seq_along(d.names),function(i,x){as.data.frame(x[,rapply(d1[i],
function(x) list(x))])x=d.names[i]})
错误：“lapply（seq_along（d.names），function（i，x）{as.data.frame（x [，rapply（d1 [i]，function（x）list（x））中的意外符号]）X“