Me revoilà pour une nouvelle question, un peu moins difficile normalement. Merci à tous ceux qui m'aideront :)
Ma question est: Comment calculer le taux de croissance et le centrage réduit de mes données?
DESCRIPTION DU JEU DE DONNÉES:
4 colonnes
-Nom de l'individu (il y a 20 individus qui sont des ruches)
-Poids de l'individu (on pèse des ruches)
-Température extérieur (on mesure la température extérieure)
-Date et heure du relevé des données Poids et Température
(Voir un modèle du tableau de données brut dans le code ci dessous)
Code : Tout sélectionner
nom <- c(rep("individu1", 5), rep("individu2", 5))
date.heure <- as.POSIXct(
c("01/01/2017 8:00:00", "01/01/2017 8:10:00", "01/01/2017 8:25:00",
"01/01/2017 8:30:00", "01/01/2017 9:10:00", "01/01/2017 8:30:00",
"01/01/2017 8:40:00", "01/01/2017 9:00:00", "01/01/2017 9:10:00",
"01/01/2017 9:22:00"),
format = "%d/%m/%Y %H:%M:%S"
)
poids <- c(20, 20.5, 22, 21, 30, 30, 30.5, 32, 31, 31.5)
temperature <- c(15, 16, 20, 18, 26, 20, 21, 22.5, 25, 24)
tab <- data.frame(nom, date.heure, poids, temperature)
QUESTION: CALCUL DU TAUX DE CROISSANCE ET CENTRER RÉDUIRE LE POIDS
J'aimerais rajouter 2 colonnes :
-Une colonne qui calcule le taux de variation du poids: tx.crois = ( (poids à date.heure 1) - (poids à date.heure 0) ) / (poids à date.heure 0)
-Une colonne qui calcule le poids centré réduit par individu
NB: Je rappelle qu'il y a 20 individus
(Voir un modèle du tableau final souhaité dans le code ci dessous)
Code : Tout sélectionner
nom <- c(rep("individu1", 5), rep("individu2", 5))
date.heure <- as.POSIXct(
c("01/01/2017 8:00:00", "01/01/2017 8:10:00", "01/01/2017 8:25:00",
"01/01/2017 8:30:00", "01/01/2017 9:10:00", "01/01/2017 8:30:00",
"01/01/2017 8:40:00", "01/01/2017 9:00:00", "01/01/2017 9:10:00",
"01/01/2017 9:22:00"),
format = "%d/%m/%Y %H:%M:%S"
)
poids <- c(20, 20.5, 22, 21, 30, 30, 30.5, 32, 31, 31.5)
temperature <- c(15, 16, 20, 18, 26, 20, 21, 22.5, 25, 24)
tx.crois <-c("a calculer", "a calculer", "a calculer", "a calculer", "a calculer", "a calculer", "a calculer", "a calculer", "a calculer", "a calculer")
CR <-c("a calculer", "a calculer", "a calculer", "a calculer", "a calculer", "a calculer", "a calculer", "a calculer", "a calculer", "a calculer")
tab <- data.frame(nom, date.heure, poids, temperature, tx.crois, CR)
==> Le but de cette manipulation est ensuite de faire une régression linéaire
-du taux d'accroissement du poids en fonction de la température
-du poids centré réduit en fonction de la température.
Merci beaucoup pour votre aide, et surtout n'hésitez pas si vous avez besoin d'informations supplémentaires ! C'est avec plaisir :)
Coralie