第R語言因子型數(shù)值轉(zhuǎn)數(shù)值型的操作一直覺得只要是數(shù)字，不管是什么類型的，都可以通過as.numeric()函數(shù)轉(zhuǎn)換為對應(yīng)的numeric類型的數(shù)字，例如

x-123，x為character類型，而as.numeric(x)則為numeric類型的123。

但是因子(factor)類型卻不一樣。

a-factor(c(100,200,300,301,302,400,10))，它們的值分別為10020030030130240010，然而

as.numeric(a)對應(yīng)的值并非10020030030130240010，而是2345671。

因子(factor)轉(zhuǎn)換成數(shù)值型(numeric)的規(guī)則是這樣的：

一共有n個數(shù)，那么轉(zhuǎn)換后的數(shù)字就會在1n中取值，數(shù)字最小的取一，次小的取二，以此類推。

那么如何讓因子(factor)類型里的數(shù)值轉(zhuǎn)換對應(yīng)的數(shù)值型呢？

mean(as.numeric(as.character(factorname)))

mean(as.numeric(levels(factorname)[factorname]))

以上代碼都可以實現(xiàn)將因子(factor)類型里的數(shù)值轉(zhuǎn)換對應(yīng)的數(shù)值型，思路都是先轉(zhuǎn)換成字符型然后再轉(zhuǎn)換成數(shù)值型。

補(bǔ)充：R_as.numeric()函數(shù)在轉(zhuǎn)換小數(shù)時返回?zé)o意義結(jié)果的解決

本文重點(diǎn)解決as.numeric()函數(shù)將factor轉(zhuǎn)為數(shù)值時得出的無意義結(jié)果的解決

假設(shè)有數(shù)據(jù)框aaa

x|y|value

------------------------------------------

a1b20.510665432157769

a2b30.887655678543227

.......

運(yùn)行as.numeric(aaa[1,3]),返回的結(jié)果居然是123？當(dāng)然，這只是個栗子，為了表達(dá)問題所在。真正運(yùn)行時不一定得到的結(jié)果是123

在Rhelp中找到如下參考

Warning

Ifxisafactor,as.numericwillreturntheunderlyingnumeric(integer)representation,whichisoftenmeaninglessasitmaynotcorrespondtothefactorlevels,seetheWarningsectioninfactor(andthe2ndexamplebelow).

看到meaningless這個詞了嗎，意思是如果使用as.numeric轉(zhuǎn)換一個因子，則通常會返回一個無意義的結(jié)果，是因子的一個整型數(shù)字象征，因為R為了節(jié)省內(nèi)存提高速度，因子類型底層是用C語言中的int實現(xiàn)的，因子的值與該整型數(shù)值的轉(zhuǎn)換表格存儲在內(nèi)存中。

那么我們?nèi)绾谓鉀Q呢？

嵌套使用

as.numeric(as.character(aaa[1,3]))

這樣返回的就是正常應(yīng)轉(zhuǎn)化的數(shù)值，而不是一個無意義的結(jié)果如一百二十三。

但上面的方法有一個問題，在小數(shù)點(diǎn)后位數(shù)太大時輸出結(jié)果會四舍五入。

對于這個，我們可以使用print()函數(shù)中的參數(shù)digit，print(as.numeric(as.character(aaa[1,3])),digits=16)，輸出的就是不帶四舍五入的完整值

理論上format(xx,digit