Discussion :

[shadok07]

Bonjour,

je souhaiterais créer une nouvelle variable avec des données "corrigées".

Je pensais passer par un mutate / case when mais je bute dans la deuxième partie de l'expression après le tilde.
Je ne sais que lui indiquer du texte et pas une formule.

En fait je cherche à transposer en R quelque chose qui s'écrit comme ça en SAS

Code SAS :

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

1
2
3
4
5
6
7
8
9
10
fl_intcorr=fl_int;  /** pour la plupart des IRIS  **/
if class7=1 and tx_rep_int<45.6 then fl_intcorr=0.506*(fl_pap+flne_x+FL_int);      
if class7=2 and tx_rep_int<47 then fl_intcorr=0.52*(fl_pap+flne_x+FL_int);
if class7=5 and tx_rep_int<11.3 then fl_intcorr=0.163*(fl_pap+flne_x+FL_int);
if class7=7 and tx_rep_int<11.1 then fl_intcorr=0.161*(fl_pap+flne_x+FL_int);
if class7=3 and tx_rep_int<33.5 then fl_intcorr=0.385*(fl_pap+flne_x+FL_int);
if class7=4 and tx_rep_int<31.3 then fl_intcorr=0.363*(fl_pap+flne_x+FL_int);
if class7=6 and tx_rep_int<34.8 then fl_intcorr=0.398*(fl_pap+flne_x+FL_int);
 
fl_papcorr=fl_pap+FL_int-fl_intcorr; /* pour tous les IRIS **/

moi je suis partie sur un truc du genre

Code :

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

1
2
3
4
TEST3 <- TEST3 %>% mutate (FL_INT_CORR = 
                          case_when (
 CLASS7=1 &  TX_REP_INT < 45.6 ~ 0.506*(TEST3$FL_PAP+TEST3$FLNE.x+TEST3$FL_INT)
))

Mais ce qui est écrit après le tilde ne marche pas

une idée?

merci

[shadok07]

RE bonjour

j'ai fini par faire fonctionner mes lignes mais mon problème est le suivant.

En j'ai une variable avec des données collectées.
Je veux créer une variable qui garde les données collectées,<ET qui modifient les lignes qui remplacent certaines conditions.
Vace mutate case when je me retrouve avec des NA pour les données non modifiées.

Je me suis dit que j'allais passer par which.
J'ai créé une copie de ma variable en changeant le nom.
J'écris mon which comme il faut puisque si je lui demande d'écrire tata il le fait. Mon problème c'est qu'il ne veut pas appliquer la formule telle que je l'écris

Code :

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

TEST4$FL_INT_CORR_5PTS[which(TEST4$CLASS7=="1" & TEST4$TX_REP_INT < 48.6)] <- 0.506*(TEST4$FLNE.x+TEST4$FL_PAP+TEST4$FL_INT)

MESSAGE d'ERREUR Warning message:
In TEST4$FL_INT_CORR_5PTS[which(TEST4$CLASS7 == "1" & TEST4$TX_REP_INT < :
le nombre d'objets à remplacer n'est pas multiple de la taille du remplacement
Le problème est dans la parenthèse de fin, car si j'écris 0,506 fois 10, ca fonctionne.
Je veux qu'il récupère les données des variables indiquées pour chaque occurrence correspondant à la variable indiquée...
Merci beaucoup de vos aides ou simples suggestions...