Factor de 0 et 1 qui se transforme en 1 et 2

Bonjour,

Voilà. J'ai un dataframe qui contient plusieurs colonnes dont la colonne "x57" qui est un vecteur d'entiers qui sont égaux soit à 0 ou 1
Je décide de transformer cette colonne en factor avec

Code:

---

data$x57 <- as.factor(data$x57)

---

Quand j'écris cette colonne dans un fichier avec

Code:

---

write(data$x57, file = "my_column.csv")

---

Le fichier contient des 2 à la place des 1 et des 1 à la place des 0.

Je n'ai pas ce problème si je ne fait pas de as.factor

Comment expliquer ceci ?

En fait j'ai confondu label et level d'un factor. Je vais essayer de comprendre ça posément

Le résultat est normal. La documentation de write le dit : les facteurs sont convertis en nombre avant d'être écrits. Ce qui est écrit dans le fichier est donc le codage interne du facteur qu'on obtient par la fonction mode.

Code:

---

1 2 3

write(data$x57, file = "my_column.csv") # est équivalent à write( as.numeric( data$x57), file = "my_column.csv")

---

Il faut écrire :

Code:

---

write( as.character( as.numeric( data$x57)), file = "my_column.csv")

---

Bonjour,

Il y a une erreur ici : write( as.character( as.numeric( data$x57)), file = "my_column.csv"), il faut écrire : write( as.numeric( as.character( data$x57)), file = "my_column.csv").

cdlt

En effet, j'ai fait une erreur en écrivant mon code en reprenant le as.numeric à l'intérieur du as.character. Le code corrigé est :

Code:

---

write( as.character( data$x57), file = "my_column.csv")

---

puisque as.character appliqué à un facteur donne les étiquettes (labels) associées à ce facteur. Ainsi le fichier contiendra bien les bonnes valeurs. Pour vérification

Code:

---

1 2 3 4 5 6 7 8

x <- factor( 0:1) x [1] 0 1 Levels: 0 1 as.numeric( x) [1] 1 2 as.character( x) [1] "0" "1"

---

Avec toutes mes excuses

Entre temps j'ai trouvé une autre solution :

Code:

---

write(levels(y_pred)[y_pred], file = "my_column.csv")

---