Problème sur SavePlot

Bonjour à tous,

Je souhaite afficher et sauvegarder un graphique (via la fonction saveplot) en utilisant le code suivant :

Code:

---

1 2 3 4

x11(width=15,height=8,pointsize=12) plot(hclust(taxdis), labels = NULL, hang = -1, xlab = "Espèces", main="Distances taxonomiques entre espèces") savePlot(filename="Graphiques/DistancesTaxonomiques", type =c("bmp"))

---

A l'exécution le graphique s'affiche correctement mais n'est pas sauvegardé.
Le message "Impossible d'ouvrir le fichier Graphiques/DistancesTaxonomiques" apparaît.

Je précise que le répertoire Graphiques est créé au même niveau que l'emplacement de mon script.

D'où pourrait venir l'erreur ?

Merci d'avance.

Bonjour,

Citation:

---

Envoyé par habasque

A l'exécution le graphique s'affiche correctement mais n'est pas sauvegardé.
Le message "Impossible d'ouvrir le fichier Graphiques/DistancesTaxonomiques" apparaît.

Je précise que le répertoire Graphiques est créé au même niveau que l'emplacement de mon script.

---

Est-ce le répertoire (celui du script) renvoyé par la commande

Code:

---

getwd()

---

?
Il serait peut-être également judicieux de préciser qu'il s'agit d'un chemin relatif en mettant

Code:

---

savePlot(filename="./Graphiques/DistancesTaxonomiques", type =c("bmp"))

---

effectivement il s'agissait d'un pbme de répertoire courant.

ce script est destiné à plusieurs utilisateurs, existe t-il un moyen pour que l'utilisateur n'ait pas à définir lui même le répertoire courant ?

Tu peux définir le répertoire de travail en début de script avec

Code:

---

setwd("<chemin absolu>")

---

mais chaque utilisateur devra l'adapter à son cas.

Sinon, tu peux faire une petite boite de dialogue en mode graphique, à l'aide du package tcltk(2), qui demande à l'utilisateur d'indiquer son répertoire de travail.

Merci, en fait je suis déjà en train de développer une interface en tcltk donc je vais partir sur l'idée de la boite de dialogue.

Y aurait des exemples de ce genre de fonctionnalité sur le net ?

C'est on ne peut plus simple :

Code:

---

1 2 3 4 5 6 7 8 9

> library(tcltk) Chargement de Tcl/Tk... terminé > ?tkchooseDirectory > dir <- tclvalue(tkchooseDirectory()) > dir ...

---

Plus directement

Code:

---

setwd(tclvalue(tkchooseDirectory()))

---

Tu peux appeler cette fonction dans une fonction associée à un bouton.

Merci, effectivement c'est très simple.
J'ai codé comme suit via un menu :

Code:

---

1 2	tkadd(topMenu,"command",label="Espace de travail", command=function() setwd(tclvalue(tkchooseDirectory())))

---

Résolu

Je relance le topic...
Avec le code suivant, mon fichier est créé mais l'extension .bmp n'apparaît pas dans mon explorateur de fichier.
Le fichier créé est de type fichier et non pas de type bitmap...

Code:

---

1 2	savePlot(file=(paste("./Graphiques/Anova1facteur",me,fa1,sep="_")), type =c("bmp"))

---

D'où peut venir le problème ?

Merci d'avance.

Citation:

---

Envoyé par habasque

JAvec le code suivant, mon fichier est créé mais l'extension .bmp n'apparaît pas dans mon explorateur de fichier.
Le fichier créé est de type fichier et non pas de type bitmap...

Code:

---

1 2	savePlot(file=(paste("./Graphiques/Anova1facteur",me,fa1,sep="_")), type =c("bmp"))

---

---

Si le problème est simplement que le fichier est créé sans extension (c'est bien ça ??), alors il faut ajouter l'extension dans l'argument file

Code:

---

1 2 3 4

savePlot(file=paste(paste("./Graphiques/Anova1facteur", me, fa1, sep="_"), ".bmp", sep=""), type =c("bmp"))

---

Je te conseille également d'aérer un peu ton code pour plus de lisibilité: les espaces entre les arguments d'une commande ne doivent pas poser problème.

merci,

en fait il faut utiliser l'argument filename et non pas file

Code:

---

1 2	savePlot(filename=paste(paste("./Graphiques/Anova1facteur", me, fa1, sep="_"), ".bmp", sep=""),type =c("bmp"))

---