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

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)轉換成數值型(numeric)

的規則是這樣的：

     一共有n個數，那麼轉換後的數字就會在1——n中取值，數字最小的取一，次小的取二，以此類推。

     那麼如何讓因子(factor)型別裡的數值轉換對應的數值型呢？

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

     以上程式碼都可以實現將因子(factor)型別裡的數值轉換對應的數值型，思路都是先轉換成字元型然後再轉換成數值型。