现在我有两个数据帧。其中一个是巨大的,就像一个库,另一个是小而空的,它只包含列名和行名,让我们称之为目标。现在我尝试填充目标,从库中获取相应的值。
让我们说目标看起来像这样:
Ind Dog Cat Fish Bird
A 0 0 0 0
B 0 0 0 0
C 0 0 0 0
D 0 0 0 0
我想要的是实现这一目标的东西:
for(i in 1:dim(target[,1]) {
for(j in 1:dim(target[1,]) {
target[i,j]<-get(library, rowname=target[i,], colname=target[,j]
}}
根据您的代码,您可以尝试这样的事情:
for(i in 1:nrow(target){
for(j in 1:ncol(target){
target[i,j]<- library[ row.names(target)[i] , col.names(target)[j] ]
}}
我假设library
有相应的行名和列名。