Warning: file_get_contents(/data/phpspider/zhask/data//catemap/3/reactjs/24.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_Loops_Csv - Fatal编程技术网

在循环R中切片数据帧

在循环R中切片数据帧,r,loops,csv,R,Loops,Csv,我有一个名为Results的数据帧,nrows=288,ncol=4 我没有循环方面的经验,我希望运行一个循环,可以删除第1-10行,然后删除第11-20、21-30行。等。在每次循环后将结果保存为CSV 谁能给我指一下正确的方向吗?谢谢 您可以使用lapply,如: 这将在名为data1-10.csv、data11-20.csv等的工作目录中写入csv n <- nrow(Results) lapply(seq(1,n, 10), function(x) write.csv

我有一个名为Results的数据帧,nrows=288,ncol=4

我没有循环方面的经验,我希望运行一个循环,可以删除第1-10行,然后删除第11-20、21-30行。等。在每次循环后将结果保存为CSV

谁能给我指一下正确的方向吗?谢谢

您可以使用lapply,如:

这将在名为data1-10.csv、data11-20.csv等的工作目录中写入csv

n <- nrow(Results)

lapply(seq(1,n, 10), function(x) 
     write.csv(Results[-(x:min((x+9), n))], paste0("data", x, "-", x+9, ".csv")))