Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/79.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
按数据帧名称的子集列表r_R_List_Dataframe_Subset - Fatal编程技术网
Fatal编程技术网
  • r/
  • 按数据帧名称的子集列表r

按数据帧名称的子集列表r

r list dataframe

按数据帧名称的子集列表r,r,list,dataframe,subset,R,List,Dataframe,Subset,给定一个包含多个数据帧的主列表a，其中a的名称存储在Anames中。我需要Anames中的一个子集，我使用setdiff函数将其存储在Cnames中 给定A，如何使用Cnames将A子集，将其存储在列表B中，然后将B中的每个数据帧写入文件，如下所示Anames和Cnames是列向量 sapply(names(B),function (x) write.csv(B[[x]],file = paste0(names(B[x]), ".csv"),row.names = FALSE)) 我们需要

给定一个包含多个数据帧的主列表
a
，其中
a
的名称存储在
Anames
中。我需要
Anames
中的一个子集，我使用
setdiff
函数将其存储在
Cnames
中

给定
A
，如何使用
Cnames
将
A
子集，将其存储在列表
B
中，然后将
B
中的每个数据帧写入文件，如下所示
Anames
和
Cnames
是列向量

sapply(names(B),function (x)  write.csv(B[[x]],file = paste0(names(B[x]), ".csv"),row.names = FALSE))
我们需要使用
intersect
查找“Anames”和“Cnames”之间的公共元素

B <- A[intersect(Anames, Cnames)
lapply(names(B), function(x) write.csv(B[[x]], 
        paste0(names(B[x]), ".csv"),row.names = FALSE, quote=FALSE))

B我们需要使用
intersect
找到“Anames”和“Cnames”之间的共同元素


B <- A[intersect(Anames, Cnames)
lapply(names(B), function(x) write.csv(B[[x]], 
        paste0(names(B[x]), ".csv"),row.names = FALSE, quote=FALSE))



B为什么需要
setdiff
？
setdiff
在
Anames
中查找那些名称，它们也可以在我的名称子集中找到。结果存储在
Cnames
中。如果要查找公共元素，请使用
intersect
。从您的描述来看，这不是很清楚。@akrun如何使用
intersect
的输出将
A
子集？
B为什么需要
setdiff
？
setdiff
在
Anames
中查找那些在我的名称子集中也可用的名称。结果存储在
Cnames
中。如果要查找公共元素，请使用
intersect
。从您的描述来看，这不是很清楚。@akrun如何使用
intersect
？
B的输出来子集
A