J'aimerai créer un tableau à partir de calculs effectuer sur un autre tableau probablement avec une fonction type tapply()
Voici un extrait de mon tableau :
Code : Tout sélectionner
structure(list(`Agrostis capillaris` = c(0, 0, 1, 0), `Agrostis sp.` = c(0,
11, 0, 0), `Agrostis stolonifera` = c(10L, 11L, 11L, 10L), `Agrostis x murbeckii` = c(0L,
0L, 0L, 0L), `Agrostis X murbeckii` = c(0L, 0L, 0L, 0L)), .Names = c("Agrostis capillaris",
"Agrostis sp.", "Agrostis stolonifera", "Agrostis x murbeckii",
"Agrostis X murbeckii"), row.names = 90:93, class = "data.frame")
Je n'ai pas réussis à renommer mes noms de colonne dans ma boucle d'où provient ce tableau, d'où les noms un peu particuliers...
dans ce tableau je voudrai lire chaque case une par une et appliquer une formule en fonction de la valeur afin de remplir un tableau de type :
Code : Tout sélectionner
Tab_sortie <- data.frame(row.names = c("espece_1", "espece_2", "valeur"))
à savoir :
Si : "11" : remplir les 2 premières colonnes de "Tab_sortie" avec le nom de colonne de "Test" et la 3eme avec "1"
Si : "10" : Remplir la 1ere colonne de "Tab_sortie" avec "Sol nu", la 2ème avec le nom de colonne de "Test" et la 3eme avec une formule (nombre de "11" + nombre de "10" de la colonne) / nombre de valeur != 00 )
Si : "01" : Pour toutes les valeurs "10" et "11" dans la même ligne : remplir la 1ere colonne de "Tab_sortie" avec le nom de colonne et remplir la 2eme colonne de "Tab_sortie" avec le nom de colonne correspondant à la case "01" et remplir la 3eme colonne de "Tab_sortie" avec une formule (1/nombre de valeur de la ligne != 00)
Ici les resultat devatn donner pour la ligne 1 :
Code : Tout sélectionner
espece_1 Agrostis.stolonifera
espece_2 Sol nu
valeur 1
puis avec la ligne 2
Code : Tout sélectionner
espece_1 Agrostis.stolonifera Agrostis.sp Agrostis.stolonifera
espece_2 Sol nu Agrostis.sp Agrostis.stolonifera
valeur 1 1 1
Enfin avec la ligne 3
Code : Tout sélectionner
espece_1 Agrostis.stolonifera Agrostis.sp Agrostis.stolonifera Agrostis.stolonifera Agrostis.stolonifera
espece_2 Sol nu Agrostis.sp Agrostis.stolonifera Agrostis.stolonifera Agrostis.capillaris
valeur 1 1 1 1 0.5
espece_1 Sol nu
espece_2 Agrostis.capillaris
valeur 0.5
J'espère que la demande est relativement claire ?
si vous pouviez me donner une piste au moins por le codage du premier : Si : "11" : remplir les 2 premières colonnes de "Tab_sortie" avec le nom de colonne de "Test" et la 3eme avec "1"
je pense pouvoir adapter cela au reste (qui n'est pas forcément très clair) par la suite.
Je vous remercie !