Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/82.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

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/list/4.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_Save - Fatal编程技术网

将存储在列表中的数据帧保存到R中的单个文件

将存储在列表中的数据帧保存到R中的单个文件,r,list,save,R,List,Save,我有一个很大的列表,merged\u fin,包含39个data.frames。数据集如下所示: > merged_fin[[1]] sourceid dstid speed 1 177 1 0.010604494 2 46 4 0.010794178 3 100 7 0.007286781 > merged_fin[[2]] sourceid dstid speed 1

我有一个很大的列表,
merged\u fin
,包含39个data.frames。数据集如下所示:

> merged_fin[[1]]
    sourceid dstid       speed
1        177     1 0.010604494
2         46     4 0.010794178
3        100     7 0.007286781

> merged_fin[[2]]
    sourceid dstid       speed
1        721    12 0.013830787
2         23    15 0.016334978
3        274    16 0.015247266
...
我想将该列表中的每个数据集保存到我工作目录中自己的
.rds
文件中

  • 尝试:

我在saveRDS(合并的[I]]中发现
错误:'file'必须是非空字符串

  • 尝试:
我得到
list()
,但没有文件保存到我的工作目录中

注:
(1)
名称(合并财务)
输出
NULL
;(2) 我最初将
merged\u fin
编码为空列表(
merged-fin根据前面的答案,下面是一个示例,说明如何分配并获取
merged-fin
列表中数据帧的名称。请注意,如果您还没有数据帧的单独名称,您也可以使用
names(merged-fin)$speed:num 0.0106 0.01079 0.00729简单地分配它们
#>df2:“数据帧”:3个变量中的3个对象:
#>$sourceid:int 72123 274
#>$dstid:int 12 15 16
#>$speed:num 0.0138 0.0163 0.0152
#将数据帧名称分配回我们的数据帧列表
名称(合并财务)[1]“df1”和“df2”
#现在我们可以将数据帧写入文件,因为每个数据帧都有一个名称
lapply(名称(合并)、功能(i)
saveRDS(合并的_fin[[i]],粘贴0(“~/Desktop/”,i,'.rds'))
#> [[1]]
#>空的
#> 
#> [[2]]
#>空的

由(v0.3.0)创建于2020-01-21在我的例子中,简单地向列表元素添加名称就足以使
lappy(名称(合并的)函数(i)saveRDS(合并的)函数(i)saveRDS(合并的[i]],粘贴0(i,'.rds'))
起作用。谢谢。
for (i in 1:length(merged_fin)){
saveRDS(merged_fin[[i]])}
saveRDS(merged_fin[[1]])
lapply(names(merged_fin), function(i)
  saveRDS(merged_fin[[i]], paste0(i, '.rds')))
lapply(names(merged_fin), function(i)
   saveRDS(merged_fin[[i]], paste0(i, '.rds')))