Conversion factor -> numeric

Bonjour, voici mon problème :

dans mon str(data), j'obtiens :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23

> str(data) 'data.frame': 1240291 obs. of 11 variables:   $ N.Adhérent : Factor w/ 112616 levels "1000000,00","1000001,00",..: 30491 30491 30491 30491 30491 30491 30491 30491 30491 30491 ...   $ Regroupement.1 : Factor w/ 30 levels "","Actes de radiologie",..: 2 2 3 3 4 4 6 6 8 8 ... $ Tranche.d.age : Ord.factor w/ 11 levels "17 à 22"<"22 à 27"<..: 8 8 8 8 8 8 8 8 8 8 ...   $ SommeDeQté.d.actes : int 379 379 3 3 233 233 3 3 27 27 ...   $ Type : Factor w/ 8 levels "Couple","Famille * 1enfant",..: 2 2 2 2 2 2 2 2 2 2 ...   $ Surcomplémentaire : Factor w/ 2 levels "NON","OUI": 1 1 1 1 1 1 1 1 1 1 ...   $ sexe : Factor w/ 1 level "1": 1 1 1 1 1 1 1 1 1 1 ... $ Expr1 : Ord.factor w/ 9 levels "- 1 mois"<"1 à 3 mois"<..: 4 5 4 5 4 5 4 5 4 5 ...   $ n.dep : Factor w/ 118 levels "01","02","03",..: 29 29 29 29 29 29 29 29 29 29 ...   $ DC...LibellÃ..code.activitÃ.: Factor w/ 23 levels "Agroalimentaire",..: 1 1 1 1 1 1 1 1 1 1 ...   $ FraisMensuels : Factor w/ 62996 levels "0,00","0,01",..: 12821 10996 151 141 20785 17773 2670 262 12886 11056 ...

---

J'aimerais transformer ma variable "$FraisMensuels" en numeric, mais impossible :

Code:

---

1 2 3

Error in `$<-.data.frame`(`*tmp*`, "Fraismensuels", value = numeric(0)) : replacement has 0 rows, data has 1240291

---

Effectivement, j'ai codé cette variable comme étant du texte sous Access.
Les séparateurs étant des virgules, R considère cette variable comme quali.
Peut-on transformer ces points en virgules sous R ?
Avez-vous un réponse à ce message d'erreur ?
Merci d'avance :ccool:

Bonjour,

• Transformer facteur en numerique: as.numeric(as.character(x))
• Fonction pour remplacer un motif par un autre, par exemple des ";" par des ",": il y a la fonction sub() de la librairie stringr

BC

La première expression ne marche pas, la transformation avec character me renvoie le même message d'erreur.

En revanche, j'aurais aimé savoir comment remplacer le motif "," par "." pour les valeurs de la variable $Fraismensuels.

Cordialement

Les deux marches normalement comme ça:

Code:

---

1 2 3

vv <- c("2,5","6,7","1.4") # vecteur caractere ww <- sub(",",".", vv) # on remplace les "," par des "." ss <- as.numeric(as.character(ww))# on transforme en numerique

---

Code:

---

1 2 3 4

> data$Fraismensuels1 <- sub(",",".",data$Fraismensuels) Error in `$<-.data.frame`(`*tmp*`, "Fraismensuels1", value = character(0)) : replacement has 0 rows, data has 1240291

---

Code:

---

1 2 3 4

> data$Fraismensuels1<-as.numeric(as.character(data$Fraismensuels)) Error in `$<-.data.frame`(`*tmp*`, "Fraismensuels1", value = numeric(0)) : replacement has 0 rows, data has 1240291

---

Cela ne fonctionne pas :cry:

Est-ce que tu pourrais mettre un peu de données s'il te plait ?
Merci.

PS: Ça serait aussi bien que tu nous montres comment tu lis (charges) ton fichier de données.

Bonjour,

Pas facile de trouver le problème sans avoir de jeu de données sur lequel le reproduire.
Voici ce que j'ai fait avec un exemple que j'ai créé en essayant de coller au votre (mon data$D correspond à votre data$Fraismensuels1) :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

data<-data.frame(A=1:5,B=c("A","B","D","C","A"),C=rnorm(5),D=as.factor(c("1,24","2,5","3,648","54,12","132,0")))   str(data) # 'data.frame': 5 obs. of 4 variables: # $ A: int 1 2 3 4 5 # $ B: Factor w/ 4 levels "A","B","C","D": 1 2 4 3 1 # $ C: num -2.3616 -1.0887 -0.5375 -0.8089 0.0884 # $ D: Factor w/ 5 levels "1,24","132,0",..: 1 3 4 5 2   data$D<-as.numeric(gsub(",",".",as.character(data$D)))   str(data) # 'data.frame': 5 obs. of 4 variables: # $ A: int 1 2 3 4 5 # $ B: Factor w/ 4 levels "A","B","C","D": 1 2 4 3 1 # $ C: num -2.3616 -1.0887 -0.5375 -0.8089 0.0884 # $ D: num 1.24 2.5 3.65 54.12 132

---

HTH :)


Cordialement,


A.D.

Résolu, merci tout de même.
Le problème était comme je le pensais se problème de virgules et de points.
J'ai tout simplement, ajouté sep="," dans mon importation.:roll:

Merci beaucoup, une erreur banale de ma part.

Have a good day !