R 使用矩阵名称列表
我想搜索75个矩阵。这些矩阵被命名为a1r1、a1r2、a1r3、a1r4、a1r5、a2r1、…a15r5,我有一个包含所有75个名称的列表;每个矩阵的行数和列数相同。在一些嵌套for循环中,我还有一行代码,第一个矩阵如下所示:R 使用矩阵名称列表,r,R,我想搜索75个矩阵。这些矩阵被命名为a1r1、a1r2、a1r3、a1r4、a1r5、a2r1、…a15r5,我有一个包含所有75个名称的列表;每个矩阵的行数和列数相同。在一些嵌套for循环中,我还有一行代码,第一个矩阵如下所示: total <- (a1r1[row,i]) + (a1r1[row,j]) + (a1r1[row,k]) total这里是实现这一点的方法: lapply(ls(pattern='a[0-9]r[0-9]'), function(nn) {
total <- (a1r1[row,i]) + (a1r1[row,j]) + (a1r1[row,k])
total这里是实现这一点的方法:
lapply(ls(pattern='a[0-9]r[0-9]'),
function(nn) {
x <- get(nn)
sum(x[row,c(i,j,k)])
})
lappy(ls(pattern='a[0-9]r[0-9]'),
功能(nn){
x这里是实现这一点的方法:
lapply(ls(pattern='a[0-9]r[0-9]'),
function(nn) {
x <- get(nn)
sum(x[row,c(i,j,k)])
})
lappy(ls(pattern='a[0-9]r[0-9]'),
功能(nn){
x这里是实现这一点的方法:
lapply(ls(pattern='a[0-9]r[0-9]'),
function(nn) {
x <- get(nn)
sum(x[row,c(i,j,k)])
})
lappy(ls(pattern='a[0-9]r[0-9]'),
功能(nn){
x这里是实现这一点的方法:
lapply(ls(pattern='a[0-9]r[0-9]'),
function(nn) {
x <- get(nn)
sum(x[row,c(i,j,k)])
})
lappy(ls(pattern='a[0-9]r[0-9]'),
功能(nn){
x自动创建指定对象的名称列表是一种不错的做法。一旦您有了对象名称列表(我们称之为mylist
),就可以使用paste
、rep
、以及0:10
等序列来创建此类列表,应用于其上的get
函数会给出对象本身。自动创建指定对象的名称列表是一种不错的做法。您可以使用paste
,rep
,以及0:10
等序列来创建此类列表。一旦有了对象名称列表(我们称之为mylist
),应用于其上的get
函数会给出对象本身。自动创建指定对象的名称列表是一种不错的做法。您可以使用paste
,rep
,以及0:10
等序列来创建此类列表。一旦有了对象名称列表(我们称之为mylist
),应用于其上的get
函数会给出对象本身。自动创建指定对象的名称列表是一种不错的做法。您可以使用paste
,rep
,以及0:10
等序列来创建此类列表。一旦有了对象名称列表(我们称之为mylist
),应用于它的get
函数给出对象本身。为什么不将矩阵本身放入列表?为什么不将矩阵本身放入列表?为什么不将矩阵本身放入列表?为什么不将矩阵本身放入列表?