Modifier un data.frame par une fonction

Bonjour,
Voilà, j'ai un truc tout bête, j'essaie de modifier un data.frame avec une fonction ; et ça ne marche pas.
Voici mon code tout simple :

Code:

---

1 2 3 4 5

BDD <- data.frame(A=c(1,2,3),B=c('a','b','c'),C=c(23,NA,111)) print(BDD) Fonction <- function() { BDD$C[is.na(BDD$C)] = 0 } Fonction() print(BDD)

---

Mon data.frame n'a pas bougé, alors que par rapport à la fonction, le data.frame est bien un élément extérieur, mais qui fait partie de son environnement.
Je sèche !

Est-ce que quelqu'un aurait une idée ?

salut enicnath,
un coup de mou :P
il faut penser au retour de la fonction et à la réaffectation dans ton dataframe initial

Code:

---

1 2 3 4 5 6 7

BDD <- data.frame(A=c(1,2,3),B=c('a','b','c'),C=c(23,NA,111)) print(BDD) Fonction <- function() { BDD$C[is.na(BDD$C)] = 0 return(BDD)} BDD <- Fonction() print(BDD)

---

bonne journée

Citation:

---

Envoyé par xavier-Pierre

salut enicnath,
un coup de mou :P
il faut penser au retour de la fonction et à la réaffectation dans ton dataframe initial
...

---

Merci Xavier-Pierre, mais c'est une solution que je voulais éviter, parce qu'en réalité, mon souci concerne une table de plusieurs milliers de lignes.
Et c'est une table que j'attaque dans une boucle, qui elle-même est longue et compliquée.
Du coup, j'ai une boucle avec réaffectation de la table ; et c'est très consommateur de temps.
En R de plus, il ne semble pas qu'on puisse passer une référence à un objet dans une fonction, comme l'indique ce lien

bonjour,
regarde le package data.table
cdlt

le code de l'exemple modifié

Code:

---

1 2 3 4 5 6

library(data.table) BDD <- data.table(A=c(1,2,3),B=c('a','b','c'),C=c(23,NA,111)) print(BDD) Fonction <- function() { BDD[is.na(C),C :=0] } Fonction() print(BDD)

---

Citation:

---

Envoyé par xavier-Pierre

bonjour,
regarde le package data.table
cdlt

---

Ah ouais ... bien !
Merci