équation linèaire avec stepwise

Postez ici vos questions, réponses, commentaires ou suggestions - Les sujets seront ultérieurement répartis dans les archives par les modérateurs

Modérateur : Groupe des modérateurs

Pierre Konan
Messages : 5
Enregistré le : 27 Juin 2018, 13:19

équation linèaire avec stepwise

Messagepar Pierre Konan » 21 Aoû 2018, 13:02

Bonjour,
je suis en stage actuellement et je travaille sur la capacité d'ingestion des brebis laitires.
j'essaie d'utiliser la méthode stepwise je veux établir une nouvelle formule de la capacité d'ingestion des brebis laitières en fonction de la parité des brebis primipares et multipares pour ce faire j'ai posé ces équations:
[1] CI = αPV + αPLSI+ γSTADE_S + δNB_AGNX+ εPLS
[2] QI= F x VEF +C x VEC
Puisque la VEC étant inconnue et comme la relation [1] = [2] on a : F x VEF = (αPV + αPLSI+ γSTADE_S + δNB_AGNX+ εPLS)-C/VEC
ce qui veut dire que VEC=(αPV + αPLSI+ γSTADE_S + δNB_AGNX+ εPLS) - (F x VEF)/ C

voici le script que j'ai utilisé sous R

primipares <- read.table("primipares.csv",sep=";",header=TRUE,dec=",")
primipares$QI_FOURxUEM_F <- primipares$F * primipares$VEF
mean(primipares$FxVEF)


# modele vide (uniquement la moyenne de la variable reponse (ivv))
varx <- c("PV", "PLS","NB_AGNX","PLSI","STADE_S")

vary <- "QI_FOURxUEM_F"
ModelV<-paste(FxVEF ~ 1")
ModelVide<-as.formula(ModelV)
print(paste("Modele VIDE :",ModelVide, sep=" "))
mod.low<- lm(ModelVide,data=primipares[,c(vary,varx)])

mod.low<- lm(ModelVide,data=primipares[,c(vary,varx)])

POURRIEZ-vous me dire ces ma meilleure de procéder ou il existe d'autres méthodes la plus efficace pour les équations linéaires.
je reste à l'ecoute

Retourner vers « Questions en cours »

Qui est en ligne

Utilisateurs parcourant ce forum : Google [Bot], Pierre-Yves Berrard et 1 invité