一直覺得只要是數(shù)字，不管是什么類型的，都可以通過as.numeric()函數(shù)轉換為對應的numeric類型的數(shù)字，例如

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

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

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

as.numeric(a)對應的值并非100 200 300 301 302 400 10，而是2 3 4 5 6 7 1。

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

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

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

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

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

補充：R_as.numeric()函數(shù)在轉換小數(shù)時返回無意義結果的解決

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

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

x   |    y     |       value 
------------------------------------------
a1      b2        0.510665432157769
a2      b3        0.887655678543227
..      ..              ...

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

在R help中找到如下參考

Warning

If x is a factor, as.numeric will return the underlying numeric (integer) representation, which is often meaningless as it may not correspond to the factor levels, see the ‘Warning' section in factor (and the 2nd example below).

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

那么我們如何解決呢？

嵌套使用

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

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

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

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

理論上format(xx, digits = 16)也可以保證長度，但我沒在這種情況下試。

以上為個人經(jīng)驗，希望能給大家一個參考，也希望大家多多支持腳本之家。如有錯誤或未考慮完全的地方，望不吝賜教。

最新評論