Analyse de données multivariées: Solution du 2nd ordre ACP

Aller en bas

Analyse de données multivariées: Solution du 2nd ordre ACP

Message par YEDIDIA le Mar 8 Aoû 2017 - 14:41

Bonjour!!!!
Je suis en train de faire en TP repris d'un cours de logiciel R. J'ai donc chargé le package ade4 de R. Je souhaite utiliser la fonction score.pca() pour obtenir un résultat du manuel mais mon R me renvoie la réponse qui dit que cette fonction n'existe pas. Pourriez vous m'aider à solutionner cela.

YEDIDIA

Nombre de messages : 3
Date d'inscription : 08/08/2017

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: Analyse de données multivariées: Solution du 2nd ordre ACP

Message par zezima le Mar 8 Aoû 2017 - 14:54

Bonjour, lorsqu'une fonction n'existe pas selon R, il y a plusieurs possibilités :

-Tu as mal écrit ta fonction (fais attention aux majuscules)
-Le package n'a pas bien été installé (fais attention à bien l'importer une fois téléchargé : "library(ade4)" et à t'assurer qu'il n'y a pas de message d'erreur
-Tu n'as pas la bonne version pour le package et donc pour utiliser la fonction
avatar
zezima

Nombre de messages : 818
Date d'inscription : 26/02/2013

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: Analyse de données multivariées: Solution du 2nd ordre ACP

Message par YEDIDIA le Mer 9 Aoû 2017 - 9:32

Bonjour ,
J'ai pu avoir une solution!!!! En fait j'utilise la version 3.3 de R et la fonction score.pca n'existe plus mais plutôt score() simplement en remplacement du score.pca().
Merci!!!!! Smile

YEDIDIA

Nombre de messages : 3
Date d'inscription : 08/08/2017

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: Analyse de données multivariées: Solution du 2nd ordre ACP

Message par droopy le Mer 9 Aoû 2017 - 9:38

Bonjour,

en fait elle existe toujours c'est juste que la fonction est cachée et qu'il faut faire appel a la fonction générique score :
Code:
methods("score")
[1] score.acm* score.coa* score.mix* score.pca*
# score.pca existe bien
ade4:::score.pca
function (x, xax = 1, which.var = NULL, mfrow = NULL, csub = 2,
    sub = names(x$tab), abline = TRUE, ...)
{
    if (!inherits(x, "pca"))
        stop("Object of class 'pca' expected")
    if (x$nf == 1)
        xax <- 1
    if ((xax < 1) || (xax > x$nf))
        stop("non convenient axe number")
    def.par <- par(no.readonly = TRUE)
    on.exit(par(def.par))
    oritab <- eval.parent(as.list(x$call)[[2]])
    nvar <- ncol(oritab)
    if (is.null(which.var))
        which.var <- (1:nvar)
    if (is.null(mfrow))
        mfrow <- n2mfrow(length(which.var))
    par(mfrow = mfrow)
    if (prod(par("mfrow")) < length(which.var))
        par(ask = TRUE)
    par(mar = c(2.6, 2.6, 1.1, 1.1))
    score <- x$l1[, xax]
    for (i in which.var) {
        y <- oritab[, i]
        plot(score, y, type = "n")
        points(score, y, pch = 20)
        if (abline)
            abline(lm(y ~ score))
        scatterutil.sub(sub[i], csub = csub, "topleft")
    }
}
<environment: namespace:ade4>
cdlt
avatar
droopy

Nombre de messages : 1109
Date d'inscription : 04/09/2009

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: Analyse de données multivariées: Solution du 2nd ordre ACP

Message par YEDIDIA le Mer 9 Aoû 2017 - 13:44

Bonjour,
Merci pour la précision!!!!

YEDIDIA

Nombre de messages : 3
Date d'inscription : 08/08/2017

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: Analyse de données multivariées: Solution du 2nd ordre ACP

Message par Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum