如何为矩阵构建for函数?
现在我有一个如下列表:如何为矩阵构建for函数?,r,for-loop,matrix,R,For Loop,Matrix,现在我有一个如下列表: mylist [[1]] [1] 0 1 0 1 1 0 0 1 0 [[2]] [1] 0 1 0 1 0 1 0 1 1 ... 我想通过for循环函数将每个列表变成一个3*3矩阵,如: for (i in 1:N){ m[i]=matrix(mylist[[i]],nrow=3,ncol=3,byrow=TRUE) } 但它不起作用 我还能做什么 谢谢你的帮助 你不需要一个循环。您可以使用lappy: ## First, make up some sampl
mylist
[[1]]
[1] 0 1 0 1 1 0 0 1 0
[[2]]
[1] 0 1 0 1 0 1 0 1 1
...
我想通过for循环函数将每个列表变成一个3*3矩阵,如:
for (i in 1:N){
m[i]=matrix(mylist[[i]],nrow=3,ncol=3,byrow=TRUE)
}
但它不起作用
我还能做什么
谢谢你的帮助 你不需要一个
循环。您可以使用lappy
:
## First, make up some sample data
set.seed(1)
mylist <- replicate(2, sample(0:1, 9, TRUE), FALSE)
## Let's work on a copy in case you need the original
m <- mylist
m
# [[1]]
# [1] 0 0 1 1 0 1 1 1 1
#
# [[2]]
# [1] 0 0 0 1 0 1 0 1 1
## Here's the actual transformation
m[] <- lapply(m, matrix, nrow = 3, byrow = TRUE)
m
# [[1]]
# [,1] [,2] [,3]
# [1,] 0 0 1
# [2,] 1 0 1
# [3,] 1 1 1
#
# [[2]]
# [,1] [,2] [,3]
# [1,] 0 0 0
# [2,] 1 0 1
# [3,] 0 1 1
##首先,编写一些示例数据
种子(1)
mylist你不需要一个循环。您可以使用lappy
:
## First, make up some sample data
set.seed(1)
mylist <- replicate(2, sample(0:1, 9, TRUE), FALSE)
## Let's work on a copy in case you need the original
m <- mylist
m
# [[1]]
# [1] 0 0 1 1 0 1 1 1 1
#
# [[2]]
# [1] 0 0 0 1 0 1 0 1 1
## Here's the actual transformation
m[] <- lapply(m, matrix, nrow = 3, byrow = TRUE)
m
# [[1]]
# [,1] [,2] [,3]
# [1,] 0 0 1
# [2,] 1 0 1
# [3,] 1 1 1
#
# [[2]]
# [,1] [,2] [,3]
# [1,] 0 0 0
# [2,] 1 0 1
# [3,] 0 1 1
##首先,编写一些示例数据
种子(1)
mylist你不需要一个循环。您可以使用lappy
:
## First, make up some sample data
set.seed(1)
mylist <- replicate(2, sample(0:1, 9, TRUE), FALSE)
## Let's work on a copy in case you need the original
m <- mylist
m
# [[1]]
# [1] 0 0 1 1 0 1 1 1 1
#
# [[2]]
# [1] 0 0 0 1 0 1 0 1 1
## Here's the actual transformation
m[] <- lapply(m, matrix, nrow = 3, byrow = TRUE)
m
# [[1]]
# [,1] [,2] [,3]
# [1,] 0 0 1
# [2,] 1 0 1
# [3,] 1 1 1
#
# [[2]]
# [,1] [,2] [,3]
# [1,] 0 0 0
# [2,] 1 0 1
# [3,] 0 1 1
##首先,编写一些示例数据
种子(1)
mylist你不需要一个循环。您可以使用lappy
:
## First, make up some sample data
set.seed(1)
mylist <- replicate(2, sample(0:1, 9, TRUE), FALSE)
## Let's work on a copy in case you need the original
m <- mylist
m
# [[1]]
# [1] 0 0 1 1 0 1 1 1 1
#
# [[2]]
# [1] 0 0 0 1 0 1 0 1 1
## Here's the actual transformation
m[] <- lapply(m, matrix, nrow = 3, byrow = TRUE)
m
# [[1]]
# [,1] [,2] [,3]
# [1,] 0 0 1
# [2,] 1 0 1
# [3,] 1 1 1
#
# [[2]]
# [,1] [,2] [,3]
# [1,] 0 0 0
# [2,] 1 0 1
# [3,] 0 1 1
##首先,编写一些示例数据
种子(1)
你好。欢迎来到Stackoverflow。R tag wiki是一种免费的开源编程语言和软件环境,用于统计计算、生物信息学和图形。请用一个最小的可重复的例子补充你的问题。有关统计问题,请使用。此外,请务必阅读并至少浏览一遍。您还应该更仔细地阅读错误消息,并发布完整的错误消息,而不是写“不起作用”。。当您尝试在LHS上使用索引进行分配,而被索引的对象不存在时,您会得到一个错误。Hi。欢迎来到Stackoverflow。R tag wiki是一种免费的开源编程语言和软件环境,用于统计计算、生物信息学和图形。请用一个最小的可重复的例子补充你的问题。有关统计问题,请使用。此外,请务必阅读并至少浏览一遍。您还应该更仔细地阅读错误消息,并发布完整的错误消息,而不是写“不起作用”。。当您尝试在LHS上使用索引进行分配,而被索引的对象不存在时,您会得到一个错误。Hi。欢迎来到Stackoverflow。R tag wiki是一种免费的开源编程语言和软件环境,用于统计计算、生物信息学和图形。请用一个最小的可重复的例子补充你的问题。有关统计问题,请使用。此外,请务必阅读并至少浏览一遍。您还应该更仔细地阅读错误消息,并发布完整的错误消息,而不是写“不起作用”。。当您尝试在LHS上使用索引进行分配,而被索引的对象不存在时,您会得到一个错误。Hi。欢迎来到Stackoverflow。R tag wiki是一种免费的开源编程语言和软件环境,用于统计计算、生物信息学和图形。请用一个最小的可重复的例子补充你的问题。有关统计问题,请使用。此外,请务必阅读并至少浏览一遍。您还应该更仔细地阅读错误消息,并发布完整的错误消息,而不是写“不起作用”。。当您尝试在LHS上使用索引进行分配,而被索引的对象不存在时,您会得到一个错误。