Merci beaucoup à Daniel pour son message toujours aussi détaillé et
précis,
Son message m'a permis, non seulement de créer mon tableau, mais surtout
d'aborder la suite avec les idées plus claires.
Pour ce qui est de la création du tableau de départ (le tableau "tab" de
l'exemple de Daniel), partant de sa suggestion, j'ai réfléchi à une
solution sans doute plus simple que celle proposée et qui s'adapte mieux
à d'autres problèmes. Notamment lorsqu'il y a plus de couples
saisons/stations. Ma solution permet aussi de se passer des "boucles"
for(i in ) qui d'après ce que j'ai compris ne sont pas trop prisées des
pros de "R", je la donne ici car cela peut servir :
saista<-toto$sai:toto$sta
toto2<-data.frame(saista,toto[ ,3:4])
tab <- (as.data.frame(xtabs(ab ~ ., data =
toto2[c("saista","esp","ab")])[ , ]))
Tito
Le mer 03/09/2003 à 14:05, Daniel Chessel a écrit :
(...) plusieurs lignes supprimées
> Le remplir :
> > nomrow=as.character(toto$sai:toto$sta)
> > nomcol=as.character(toto$esp)
> > for (i in 1:nrow(toto)) tab[nomrow[i],nomcol[i]]=toto$ab[i]
> > tab
> Bni Bpu Brh Bsp Cae Cen Ecd Eda Eig Hla Par Rhi
> sp:1 9 0 10 7 0 0 0 4 0 9 4 5
> sp:2 0 0 8 0 0 0 0 0 0 4 0 0
> sp:3 0 0 5 5 0 0 0 0 0 5 0 2
> sp:4 0 0 6 3 0 0 0 0 0 6 0 3
> sp:5 0 0 6 5 0 0 5 0 4 4 0 0
> su:1 0 10 10 7 0 0 0 6 2 7 0 2
> su:2 0 0 9 0 0 0 0 0 0 0 0 0
> su:3 0 0 8 6 0 2 0 0 0 0 0 0
> su:4 0 0 11 7 5 2 0 0 5 2 0 0
> su:5 2 3 9 6 2 0 4 0 7 0 0 0
>
(...) plusieurs lignes supprimées
--
L. Tito de Morais
UR RAP
IRD de Dakar
BP 1386
Dakar
Sénégal
Tél.: + 221 849 33 31
Fax: +221 832 16 75
Courriel: tito@ird.sn
This archive was generated by hypermail 2b30 : Tue Sep 07 2004 - 13:45:24 MEST