使用循环将变量中的每个字符串存储在变量中

Question

假设我执行以下操作：

x <- 'zeal'
t <- strsplit(x, '')
g <- unlist(t)
g
[1]"z" "e" "a" "l" 
r <- letters[(which(g[1] == letters))]
r
[1]"z"

我的最终目标是找到我可以说的内容＆＃34;找到some variable中匹配something的元素，例如，如果我有

e <- 'bacon'
e <- strsplit(e, '')
e <- unlist(e)
e
[1]"b" "a" "c" "o" "n"

然后＆＃34;在e中找到匹配＆＃34; b＆＃34;＆＃34;的元素。然后应用它直到e中的所有元素都匹配

Answer 1

我不认为sum会做任何事情，因为每个g元素只会匹配一次。在这里，您可以使用apply函数而不是R中的标准循环。变量i就像您编写的g[i]一样。

sapply(g, function(i) letters[which(i == letters)])