我试图根据查找值为每一行分别赋值给不同的列。
#Item scores
item1 <- c(NA, 1, NA, 4)
item2 <- c(NA, 2, NA, 3)
item3 <- c(NA, 3, NA, NA)
item57 <- c(NA, 4, 4, 1)
mydata <- data.frame(item1, item2, item3, item57)
#Lookup values based on item score
lookup <- data.frame(score = 1:4, value=c(6, 7, 8, 10))
我希望在数据框架中为与项分数相关联的值(基于查找表)创建变量。下面是我想要的输出:
#Desired output (adding value that is tied to item score to the original data)
desiredOutput <- cbind(mydata,
value1 = c(NA, 6, NA, 10),
value2 = c(NA, 7, NA, 8),
value3 = c(NA, 8, NA, NA),
value57 = c(NA, 10, 10, 6))
我有一个相当大的数据集,如果可能的话,我想远离循环。此外,如果处理速度更快,我们可以跳过所有NAS的行。
相似问题