将 df 中的字符替换为 R 中的数字向量

Question

我想替换特定数字向量的字符。

我有这个df：

First Second Third
 A      C      D
 F      R      K

and I also have vectors like these
A = c(1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0)

R = c(0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0)

N = c(0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0)

我已经尝试了几次，但我做不到。 有没有人有一些建议或想法？

Answer 1

一个选项是取消列表（如果它是factor则转换为character ），然后使用mget在list中返回该unlist的值

lst1 <- mget(as.character(unlist(df)))