如何在 R 中将因子格式转换为数字格式而不更改值？ [复制]

下面是数据帧 df1，我想将其中的“V2”列从因子格式转换为数字，而不更改当前值（0 ; 0 ; 8,5 ; 3）。

df1=

             V1  V2 V3       X2 X3
4470 2010-03-28   0  A 21.53675  0
4471 2010-03-29   0  A 19.21611  0
4472 2010-03-30 8,5  A 21.54541  0
4473 2010-03-31   3  A       NA NA

由于“V2”列采用因子格式，我首先将其转换为字符格式：df1[,2]=as.character(df1[,2])

然后我尝试将“V2”转换为数字格式：

df1[,2]=as.numeric(df1[,2])

导致此 R 消息：

Warning message: NAs introduced by coercion

下面的数据框在哪里df[3,2]已更改为“NA”而不是剩余的“8,5”..

             V1 V2 V3       X2 X3
4470 2010-03-28  0  A 21.53675  0
4471 2010-03-29  0  A 19.21611  0
4472 2010-03-30 NA  A 21.54541  0
4473 2010-03-31  3  A       NA NA 

这可能与 8,5 不是整数有关。我仍然不知道如何解决这个问题。非常感谢您的帮助！

尝试用此方法替换数据中的逗号：

fac<- c( "0" , "0" , "1,5" , "0" , "0" , "8" )
#[1] "0"   "0"   "1,5" "0"   "0"   "8" 
fac <- as.numeric( sub(",", ".", fac) )
#[1] 0.0 0.0 1.5 0.0 0.0 8.0

更一般地将因子转换为其基础值而不是因子表示形式：

fac <- as.factor( fac )
as.numeric(fac)
#[1] 1 1 2 1 1 3
as.numeric(as.character(fac))
#[1] 0.0 0.0 1.5 0.0 0.0 8.0

然而，这是转换为原始值的规范方式

 as.numeric(levels(fac))[fac]

从帮助页面?as.factor

特别是，应用于因子的 as.numeric 是没有意义的，并且可能通过隐式强制转换发生。要将因子 f 转换为近似其原始数值，建议使用 as.numeric(levels(f))[f]，它比 as.numeric(as.character(f)) 稍微高效一些。