将字符群体形成单元转换为R中的数字科学符号。

Question

假设我有一个特征向量，其中包含特定细菌种类的菌落形成单位的数据。

head(data$bacteria)
[1] "3*10^5" "2*10^6" "10^4"   "7*10^7" "3*10^6" "2*10^7"

我希望带有仿真器的chr向量是一个带有这个仿真字表达式的数值结果的矢量，这样我就可以使用as.numeric进行一些统计测试，但它强迫数据到NAs。

as.numeric(data$bacteria)
NAs introduced by coercion [1] NA NA NA NA NA NA...

如何将带有数学表达式的字符向量转换为科学表示法中的表达式的数值结果而不丢失信息？

Answer 1

您可以使用：

sapply(data$bacteria, function(x) eval(parse(text = x)), USE.NAMES = FALSE)

伊格-

x1 <- c("3*10^5" ,"2*10^6", "10^4",   "7*10^7","3*10^6", "2*10^7")
sapply(x1, function(x) eval(parse(text = x)), USE.NAMES = FALSE)
#[1] 3e+05 2e+06 1e+04 7e+07 3e+06 2e+07