Discussion :

[Abdallah79596]

Bonjour,

En fait j'ai problème avec mon projet R, j'ai un dataframe avec une variable noms. Je voudrais comparer les noms, si ils se ressemblent, je compare la date d'arrivé si c'est la même je compare enfin le prix du séjour et le programme doit supprimer la ligne qui a le prix de séjour le plus élevé c'est à dire celui avec la taxe.

j'ai écrit ce bout de code mais il me met des erreurs
Voici mon code et le dataframe


.

Merci par avance,

[mgdondon]

Bonjour,

Est ce que votre problème revient à retenir une observation par nom de client et date d'arrivée ?

Dans l'affirmative je vous propose de trier la table, numéroter les observation de chaque groupe et sélectionner la première :

Code :

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

1
2
3
4
df <- read.csv("d:/temp/test.txt")
df <- df[order(df$NomClient,df$DateArriv,df$PrixSej),]
row.names(df) <- 1:nrow(df)
df$RepNo <- sequence(rle(as.vector(paste(df$NomClient,df$DateArriv)))$lengths)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
   NumClient NomClient   DateResa  DateArriv    DateDep                    CatEmp Pays PrixSej EtatFac JourSej RepNo
1      23665       BRO 2019-09-12 2020-07-27 2020-08-10      Emplacements Camping   GB   467.6      NA      14     1
2      17464       COL 2019-09-12 2020-08-01 2020-08-04      Emplacements Camping   GB   100.2      NA       3     1
3      26514       HAG 2019-11-04 2020-07-18 2020-07-21          Premium caravane   AM   190.8      NA       3     1
4      26150       HAL 2019-10-14 2020-05-23 2020-05-30 Chalet Mile Woody Premium   GB   879.4      NA       7     1
5      27978       HAL 2019-11-12 2020-08-01 2020-08-08        Chalet Toile Woody   GB  1149.5      NA       7     1
6      21195       HAN 2019-09-12 2020-07-19 2020-08-05      Emplacements Camping   PS   567.8      NA      17     1
7      23386       JOH 2019-10-15 2020-04-18 2020-04-25      Emplacements Camping   GB   106.4      NA       7     1
8      23386       JOH 2019-10-15 2020-07-04 2020-07-11      Emplacements Camping   GB   208.6      NA       7     1
9      24860      KEEL 2019-11-12 2020-04-12 2020-04-13      Emplacements Camping   GB    15.2      NA       1     1
10       225       KUY 2019-09-12 2020-07-08 2020-07-16      Empiacements Camping   PB   237.8      NA       8     1
11     16656       MED 2019-10-30 2020-07-11 2020-07-18      Mobilhome Nautilhome   PB   649.6      NA       7     1
12      9407       NO3 2019-09-12 2020-07-04 2020-07-23      Emplacements Camping   GB   566.0      NA      19     1
13     27495       NOR 2019-09-12 2020-05-23 2020-05-30      Mobilhome Nautilhome   GB   460.0      NA       7     1
14     27495       NOR 2019-09-12 2020-05-23 2020-05-30      Mobilhome Nautilhome   GB   460.0      NA       7     2
15     23212       POU 2019-09-12 2020-07-22 2020-08-01          Premium caravane   GB   532.0      NA      10     1

Code :

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

df[df$RepNo==1,]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
   NumClient NomClient   DateResa  DateArriv    DateDep                    CatEmp Pays PrixSej EtatFac JourSej RepNo
1      23665       BRO 2019-09-12 2020-07-27 2020-08-10      Emplacements Camping   GB   467.6      NA      14     1
2      17464       COL 2019-09-12 2020-08-01 2020-08-04      Emplacements Camping   GB   100.2      NA       3     1
3      26514       HAG 2019-11-04 2020-07-18 2020-07-21          Premium caravane   AM   190.8      NA       3     1
4      26150       HAL 2019-10-14 2020-05-23 2020-05-30 Chalet Mile Woody Premium   GB   879.4      NA       7     1
5      27978       HAL 2019-11-12 2020-08-01 2020-08-08        Chalet Toile Woody   GB  1149.5      NA       7     1
6      21195       HAN 2019-09-12 2020-07-19 2020-08-05      Emplacements Camping   PS   567.8      NA      17     1
7      23386       JOH 2019-10-15 2020-04-18 2020-04-25      Emplacements Camping   GB   106.4      NA       7     1
8      23386       JOH 2019-10-15 2020-07-04 2020-07-11      Emplacements Camping   GB   208.6      NA       7     1
9      24860      KEEL 2019-11-12 2020-04-12 2020-04-13      Emplacements Camping   GB    15.2      NA       1     1
10       225       KUY 2019-09-12 2020-07-08 2020-07-16      Empiacements Camping   PB   237.8      NA       8     1
11     16656       MED 2019-10-30 2020-07-11 2020-07-18      Mobilhome Nautilhome   PB   649.6      NA       7     1
12      9407       NO3 2019-09-12 2020-07-04 2020-07-23      Emplacements Camping   GB   566.0      NA      19     1
13     27495       NOR 2019-09-12 2020-05-23 2020-05-30      Mobilhome Nautilhome   GB   460.0      NA       7     1
15     23212       POU 2019-09-12 2020-07-22 2020-08-01          Premium caravane   GB   532.0      NA      10     1

Cordialement,

PS : Ci-joint le fichier csv.

[Abdallah79596]

En gros c'est ça
Merci