Konvertieren kategoriale Variablen numerisch in R

Können Sie unclass() zur Anzeige numerischer Werte von Faktor-Variablen :

Type_peau<-as.factor(c("Mixte","Normale","Sèche","Mixte","Normale","Mixte"))
Type_peau
unclass(Type_peau)

Tun also auf alle kategorialen Variablen, die Sie verwenden können sapply() :

must_convert<-sapply(M,is.factor)       # logical vector telling if a variable needs to be displayed as numeric
M2<-sapply(M[,must_convert],unclass)    # data.frame of all categorical variables now displayed as numeric
out<-cbind(M[,!must_convert],M2)        # complete data.frame with all variables put together

EDIT : A5C1D2H2I1M1N2O1R2T1 Lösung arbeitet in einem Schritt :

out<-data.matrix(M)

Es funktioniert nur, wenn Ihre Daten.Rahmen nicht enthalten alle Zeichen variable (oder sonst, Sie werden sein put zu NA).

InformationsquelleAutor Vincent

Vielleicht sind Sie nach data.matrix. Von der Funktion, Beschreibung:

Rückkehr der matrix, die durch die Umwandlung aller Variablen in einem data frame zu nummerischen Modus und dann binden Sie zusammen, als die Spalten einer matrix. Faktoren und geordnete Faktoren ersetzt werden, die von Ihren internen codes.

Beispiel:

mydf <- data.frame(A = letters[1:5],
                   B = LETTERS[1:5],
                   C = month.abb[1:5],
                   D = 1:5)
str(mydf)
# 'data.frame': 5 obs. of  4 variables:
#  $ A: Factor w/5 levels "a","b","c","d",..: 1 2 3 4 5
#  $ B: Factor w/5 levels "A","B","C","D",..: 1 2 3 4 5
#  $ C: Factor w/5 levels "Apr","Feb","Jan",..: 3 2 4 1 5
#  $ D: int  1 2 3 4 5
data.matrix(mydf)
#      A B C D
# [1,] 1 1 3 1
# [2,] 2 2 2 2
# [3,] 3 3 4 3
# [4,] 4 4 1 4
# [5,] 5 5 5 5

Ersetzen Sie es alle auf einmal mit:

mydf[] <- data.matrix(mydf)
mydf
#   A B C D
# 1 1 1 3 1
# 2 2 2 2 2
# 3 3 3 4 3
# 4 4 4 1 4
# 5 5 5 5 5

Natürlich, wenn Sie haben viele weitere Spaltentypen, müssen Sie zunächst entscheiden, wie Sie möchten, um mit Ihnen umzugehen. Zum Beispiel gibt es die Sorge, dass, wenn es eine character Spalte data.matrix würde das Ergebnis in einer Spalte NA Werte, das ist richtig. Aber auch die richtige Sorge sollte sein: "Wie möchten Sie befassen sich mit character Spalten?

Hier sind zwei Optionen. Verlängern Sie die Logik auch für andere Spaltentypen.

mydf <- data.frame(A = letters[1:5],
                   B = LETTERS[1:5],
                   C = month.abb[1:5],
                   D = 1:5)
mydf$E <- state.abb[1:5]
str(mydf)
# 'data.frame': 5 obs. of  5 variables:
#  $ A: Factor w/5 levels "a","b","c","d",..: 1 2 3 4 5
#  $ B: Factor w/5 levels "A","B","C","D",..: 1 2 3 4 5
#  $ C: Factor w/5 levels "Apr","Feb","Jan",..: 3 2 4 1 5
#  $ D: int  1 2 3 4 5
#  $ E: chr  "AL" "AK" "AZ" "AR" ...

## You want to convert everything to numeric
data.matrix(data.frame(unclass(mydf))) 
#      A B C D E
# [1,] 1 1 3 1 2
# [2,] 2 2 2 2 1
# [3,] 3 3 4 3 4
# [4,] 4 4 1 4 3
# [5,] 5 5 5 5 5

## You only want to convert factors to numeric
mydf[sapply(mydf, is.factor)] <- data.matrix(mydf[sapply(mydf, is.factor)])
mydf
#   A B C D  E
# 1 1 1 3 1 AL
# 2 2 2 2 2 AK
# 3 3 3 4 3 AZ
# 4 4 4 1 4 AR
# 5 5 5 5 5 CA

InformationsquelleAutor A5C1D2H2I1M1N2O1R2T1

Den besten und schnellsten Weg, dies zu tun ist, indem mithilfe des folgenden Codes:

DataFrameYouWant <- data.frame(yourData)
DataFrameYouWant[] <- lapply(DataFrameYouWant, as.integer)

Code oben automatisch konvertiert alle der Faktor die Variablen in den Daten zu numerischen und Ihre Daten zu einem Daten-frame. Sie können angeben, welche Spalten/Variablen, die Sie konvertieren möchten, zu zahlen.

InformationsquelleAutor Pat Ca