Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/77.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/7/kubernetes/5.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
如何使用for循环使用R分割矩阵或数据帧?_R_Matrix_Split_Dataframe - Fatal编程技术网

如何使用for循环使用R分割矩阵或数据帧?

如何使用for循环使用R分割矩阵或数据帧?,r,matrix,split,dataframe,R,Matrix,Split,Dataframe,我想使用for loop函数输出n/2 NewMatrix,NewMatrix这可能有帮助: indx <- 1:(ncol(OldMatrix)-1) lst1 <- setNames(lapply(indx, function(i) OldMatrix[,c(i, i+1)]), paste("NewMatrix",indx, sep="_")) lst1$NewMatrix_10 # J K #[1,] "1" "4" #[2,] "1" "4

我想使用for loop函数输出n/2 NewMatrixNewMatrix这可能有帮助:

 indx <- 1:(ncol(OldMatrix)-1) 
 lst1 <- setNames(lapply(indx, function(i) OldMatrix[,c(i, i+1)]), paste("NewMatrix",indx, sep="_"))

 lst1$NewMatrix_10
 #      J   K  
 #[1,] "1" "4"
 #[2,] "1" "4"
 #[3,] "1" "4"
 #[4,] "1" "4"
 #[5,] "1" "4"
 #[6,] "1" "4"

indx您应该使用列表。每当您有名为
x_1
x_2
,….的变量时,这就很好地表明,使用名为
x
的列表以及元素
1
2
。。。
 indx <- 1:(ncol(OldMatrix)-1) 
 lst1 <- setNames(lapply(indx, function(i) OldMatrix[,c(i, i+1)]), paste("NewMatrix",indx, sep="_"))

 lst1$NewMatrix_10
 #      J   K  
 #[1,] "1" "4"
 #[2,] "1" "4"
 #[3,] "1" "4"
 #[4,] "1" "4"
 #[5,] "1" "4"
 #[6,] "1" "4"