Je cherche à automatiser mon script, mais quand je lui demande de récupérer la valeur dans une colonne (DataBrush$Size.transect) il me donne ceci,
Code : Tout sélectionner
#estimation de la densité de brush pack
BrushPackDensityTotal<-(1/(DataBrush$Size.transect*length(levels(DataBrush$IDtransect))))*sum(1/DataBrush$li)
BrushPackDensityTotal
Cela donne un résultat de ce type:
Code : Tout sélectionner
> BrushPackDensityTotal
[1] 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077
[12] 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077
[23] 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077
[34] 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077
[45] 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077
[56] 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077
[67] 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077 0.2723077
[78] 0.2723077 0.2723077 0.2723077
Alors que quand je rentre manuellement la valeur cela me donne mon résultat sous la forme que je recherche une seule valeur car je cherche a la rentrer dans un tableau ultérieurement.
Code : Tout sélectionner
> BrushPackDensityTotal<-(1/(25*length(levels(DataBrush$IDtransect))))*sum(1/DataBrush$li)
> BrushPackDensityTotal
[1] 0.2723077
Donc ma question est surtout de comprendre pourquoi le résultat change de forme, puis dans un deuxième temps comment rendre ça plus "esthétique"
Cordialement paul