Discussion :

[mathieu_r]

Bonjour,

Dans une fonction englobée dans by, je souhaite exécuter plusieurs choses, comment faire?

Pour l'instant, j'ai ça:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
by(spP,spP$jannatmin, function(x) { 
hist(x$band1,main=unique(x$jannatmin) 
lines(density(x$band1)
})

Si vous pouvez m'éclairer

[A. D.]

Bonjour,

Pour ce genre de cas, il est toujours bienvenu d'ajouter un court mais représentatif extrait de son jeu de données. En effet, il est plus facile de comprendre un code "étranger" lorsque l'on sait à quoi font référence les variables (spP$jannatmin, ...).


Personnellement, j'ai essayé le code suivant et il fonctionne chez moi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
> u<-c(1,2,3,1,1,2,2,3,1,3,3,1,1,2,3,rnorm(15))
 
> spP<-matrix(u,byrow=FALSE,ncol=2)
> colnames(spP)<-c("jannatmin","band1")
 
> spP<-as.data.frame(spP)
 
 
> f<-function(x) 
{ 
	hist(x$band1,main=unique(x$jannatmin))
	lines(density(x$band1))
}
 
 
>par(mfrow=c(1,3))
 
>by(spP,spP$jannatmin,f)

Je pense que le problème vient peut-être du fait que vous avez oublié les parenthèses fermantes des fonctions "hist" et "lines".

Si vous souhaitez absolument écrire la fonction à l'intérieur de votre "by", il faut penser au point-virgule ";" entre les instructions. Un exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

> by(spP,spP$jannatmin,function(x) { hist(x$band1,main=unique(x$jannatmin)) ; lines(density(x$band1)) })

En espérant que ceci vous aide un peu


Cordialement,

A.D.

[mathieu_r]

oui, tout à fait, ça m'aide bcp.
Je ne connaissais pas l'histoire du point virgule.

C'est parfait.

Merci.