R中需要数字时如何计算字符串？

Question

我想将数字更改为因子，但我的因子级别以字符串形式给出，而函数因子需要数字。如何将其转换为数字或评估字符串？示例：

给定：

a = c(0,1,1,1,0,1,0)

lev = 'c(0,1)' 

lab = c('firstlev','secondlev') # this is irrelevant to question.

想要：

factor(a,levels = lev labels = lab)

我可以明确地编写级别，但我有一个大循环，并且正在从另一个文件自动读取因子级别。我尝试了 quo、!!、eval 和朋友，但我完全不知道什么是正确的方法，甚至我应该寻找什么，从字符串到数字的转换，或者字符串的评估类型。

Answer 1

怎么样：

a = c(0,1,1,1,0,1,0)

lev = 'c(0,1)' 

lab = c('firstlev','secondlev') # this is irrelevant to question.

factor(a,levels = eval(parse(text=lev)), labels = lab)
#> [1] firstlev  secondlev secondlev secondlev firstlev  secondlev firstlev 
#> Levels: firstlev secondlev

^{由 reprex 包 (v2.0.1) 创建于 2022 年 4 月 4 日< /sup>}