Bonjour

Je souhaite tout simplement utiliser xtabs() dans une fonction. Exemple :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
DF <- data.frame(id=1:11,Sexe=c('G','G','G','F','F','F','G','F','F','G','F'),Nbr=c(1,2,1,0,1,1,3,1,0,1,2))
Fonction <- function(Table, Variable1, Variable2) { 
   xtabs(Variable1~Variable2,data=Table)
}
Fonction(DF,Nbr,Sexe)
L'exemple est tout bête, mais ça plante !

Est-ce que quelqu'un saurait me dire comment écrire cette fonction ?