Bonjour à tous,
Je viens vers vous car je suis bloquée par rapport à une programmation. Voilà, j'aimerai créer une fonction pour afficher un histogramme + densité de probabilité d'une variable de mon choix (que j'ai bien créée au préalable dans la console )
Voici mes entrées :
Il m'affiche correctement mon histogramme mais R me retourne tout de même ceci :Code:Histogrammepluies<-function(series){ if(series==histannuel){ annuel<-hist((an$V2),xlab="Pluviométrie annuelle", main="Histogramme de fréquences et densité de probabilité- Pluies annuelles de 1873 à 2004 (Paris)",freq=F) lines(density(an$V2),col="red",lwd=2) return(annuel)} if(series==histmensuel){ mensuel<-hist((mois$V2),xlab="Pluviométrie mensuelle", main="Histogramme de fréquences et densité de probabilité- Pluies mensuelles de 1770 à 2004 (Paris)",freq=F) lines(density(mois$V2),col="red",lwd=2) return(mensuel)} if(series==histjour){ journalier<-hist((jour$moyenne.BV),xlab="Pluviométrie journalière", main="Histogramme de fréquences et densité de probabilité-Pluies journalières de 1950 à 2004 (Paris)",freq=F) lines(density(jour$moyenne.BV),col="red",lwd=2) return(journalier)} }
Auriez vous une idée ? Une petite aide à me donner ?Code:Warning messages: 1: In series == histannuel : longer object length is not a multiple of shorter object length 2: In if (series == histannuel) { : the condition has length > 1 and only the first element will be used 3: In series == histmensuel : longer object length is not a multiple of shorter object length 4: In if (series == histmensuel) { : the condition has length > 1 and only the first element will be used 5: In if (series == histjour) { : the condition has length > 1 and only the first element will be used
Je vous remercie infiniment
Marie de Seine Maritime.
-----