Bonjour
J'aimerai faire une boucle pour que R calcule des prévalences pour 4 quarters de 6 années et m'empile le tout dans un tableau
J'ai essayé d'écrire un code avec la fonction for mais j'obtiens le message d'erreur suivant
> for (i in (1:6)) {
+
+ tab1<- tab[tab$Quarters =="0[i]-Q1",]
+ clustot1<-svydesign(id=~num+Id_An, fpc=~fpc1+Totanim,strata = NULL, data=tab1)
+ res1<-data.frame(svymean(~Tbtpos,clustot1,na.rm = TRUE))
+
+ tab2<- tab[tab$Quarters =="0[i]-Q2",]
+ clustot2<-svydesign(id=~num+Id_An, fpc=~fpc1+Totanim,strata = NULL, data=tab2)
+ res2<-data.frame(svymean(~Tbtpos,clustot2,na.rm = TRUE))
+
+ tab3<- tab[tab$Quarters =="0[i]-Q3",]
+ clustot3<-svydesign(id=~num+Id_An, fpc=~fpc1+Totanim,strata = NULL, data=tab3)
+ res3<-data.frame(svymean(~Tbtpos,clustot3,na.rm = TRUE))
+
+ tab4<- tab[tab$Quarters =="0[i]-Q4",]
+ clustot4<-svydesign(id=~num+Id_An, fpc=~fpc1+Totanim,strata = NULL, data=tab4)
+ res4<-data.frame(svymean(~Tbtpos,clustot4,na.rm = TRUE))
+
+ dfr[i]<-rbind (res1,res2,res3,res4)
+ dfr[i]$Quarter<- c("0[i]-Q1","0[i]-Q2","0[i]-Q3","0[i]-Q4") }
Erreur dans rowSums(table(ids[, 1], strata[, 1]) > 0) :
'x' doit être un tableau ayant au moins 2 dimensions
lorque j'essaye d'éxecuter independemment les lignes de colonnes pour i = 1 par exemple ca marche donc j'imagine que c'est ma boucle qui ne fonctionne pas. Est ce que vous voyez ce qu'il manque ?
Merci d'avance