titre de graphique dans une fonction

[Véronique Sarrot]

Bonjour,

J'ai crée une fonction, qui à partir d'un vecteur me renvoie 2 graphiques.
voici le script :

Code : Tout sélectionner

sim_fct =  function(nom, zc, nperm)
{ sim = matrix ( 0, nperm +1, zc)
sim [1,] = nom[1:zc]
for (i in 1: nperm) {sim[i+1,]=sample(nom,size= zc)}
moy=apply(sim, 1, mean)
moysim=moy[2:length(moy)]
moyobs=moy[1]
x= sort(moysim)
plot(x,type="l",col=col[2])
abline(v=moyobs,col=col[15])
x11()
hist(x,xlim=c(0,moyobs+1),main=names(nom))
abline(v=moyobs,col=col[15])}


je voudrais que le titre des graphiques indique le nom réel du vecteur utilisé, mais je n'arrive pas à l'extraire : je croyais qu'il fallais utiliser la fonction names, mais apparemment, c'est pas ça !
Pourriez-vous m'aider ?

Véronique

[Matthieu Lesnoff]

Bonjour,

je voudrais que le titre des graphiques indique le nom réel du vecteur utilisé, mais je n'arrive pas à l'extraire : je croyais qu'il fallais utiliser la fonction names, mais apparemment, c'est pas ça !

Véronique

Pour un dataframe, la fonction "names" sort les noms des variables, pas le nom du data frame. Dans votre code, essayez de remplacer :

Code : Tout sélectionner

..., main=names(nom))

par :

Code : Tout sélectionner

..., main = as.character(substitute(nom)))

M.

[Véronique Sarrot]

merci, c'est bien ce qu'il fallait !