Discussion :

[franckm95]

Bonsoir à tous , j'ai un fichier de 200 milles lignes que j'importe sur R.

Dans ce fichier il y a une colonne PERIODICITE contenant ( Mensuel, Semestriel , Annuel )

Je veux créer un programme qui compile vite et qui crée une colonne q

q affiche 1 si Annuel , 2 si semestriel et 12 pour mensuel
ci dessous mon code qui m'affiche une erreur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
q=rep(0,length(PERIODICITE))
for(t in 1:length(PERIODICITE)){
  if (PERIODICITE[t] == "A"){q[t]=1} 
  else if (PERIODICITE[t] == "S") {q[t]=2}
  else {q[t] = 12}
}

Voici l'erreur qui s'affiche


Error in if (PERIODICITE_REMBOURSEMENT_PRET[t] == "A") { :
valeur manquante là où TRUE / FALSE est requis


s'il vous plait ,je voudrais un coup de main de votre part chers membres

[mgdondon]

Bonjour,

Les opérations sur les observations s'effectuent en parallèle, pas de raison de faire de boucle ici. De plus il est préférable d'utiliser une fonction du type case of :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

df <- data.frame(PERIODICITE=c("A","S","M"))

Avec le package dplyr :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
df$q1 <- dplyr::case_when(
  df$PERIODICITE == "A" ~ 1,
  df$PERIODICITE == "S" ~ 2,
  df$PERIODICITE == "M" ~ 12
  )

Avec le package memisc :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
df$q2 <- memisc::cases(
  df$PERIODICITE == "A" -> 1,
  df$PERIODICITE == "S" -> 2,
  df$PERIODICITE == "M" -> 12
  )

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
  PERIODICITE q1 q2
1           A  1  1
2           S  2  2
3           M 12 12

Cordialement,

[franckm95]

@mgdondon , grand merci à vous .