Création de plusieurs fichiers csv à partir d'un dataframe

Bonjour, j'ai un fichier csv avec plusieurs variables, et chaque variables a plusieurs modalités, comme illustré en bas pour exemple :

A B C D

a aa aaa aaaa
a dd ddd ssss
b ss eee dddd
b cc fff ffff
c vv fff gggg
c gg ddd rrrr
d ff sss tttt
d rr ggg gggg

j'ai fait un code pour réaliser une boucle pour choisir chaque modalité de la variable A par exemple et la mettre avec les données correspondant dans un nouveau fichier csv avec le nom de la modalité comme illustré en bas :
a.csv
b.csv
c.csv
d.csv

dans un dossier spécifique avec les données correspondant des autres colonnes (B, C, D) mais je n'arrive pas à avoir les sorties recherchées si vous pouvez m'aider la-dessus et merci !!!

voila le morceau de codes que j'ai fait, j'espère que j'étais un peu claire :

Code:

---

1 2 3 4 5 6

for (x in levels(factor(data$A))) { files_names=vector("list", length =levels(factor(data$A)) files_names[[x]]=data$A[[x]] n_data<-data[data$A==x,] write.csv(n_data, file ="files_names[[x]].csv", row.names = FALSE ) }

---

bonjour,

Code:

---

1 2 3 4

for (x in unique(df$A)){ write.csv(df[df$A == x,],paste0(x,".csv"),row.names = F) }

---

cdlt

autre solution avec le tidyverse

Code:

---

1 2 3

library(tidyverse) walk(unique(df$A),~write.csv2(df %>% filter(A ==.x),str_c(.x,'.csv'),row.names = F))

---

Bonjour, Xavier-pierre, merci pour la réponse je vais essaye ton code et je reviendrai vers toi ;-)

Citation:

---

Envoyé par xavier-Pierre

bonjour,

Code:

---

1 2 3 4

for (x in unique(df$A)){ write.csv(df[df$A == x,],paste0(x,".csv"),row.names = F) }

---

cdlt

---

Merci beacuoup il marchait comme je voulait ;-)

Citation:

---

Envoyé par xavier-Pierre

bonjour,

Code:

---

1 2 3 4

for (x in unique(df$A)){ write.csv(df[df$A == x,],paste0(x,".csv"),row.names = F) }

---

cdlt

---