Discussion :

[habasque]

Bonjour à tous,

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

Code :

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

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.

[pitipoisson]

Bonjour,

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 :

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

getwd()

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

Code :

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

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

[habasque]

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 ?

[pitipoisson]

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

Code :

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

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.

[habasque]

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 ?

[pitipoisson]

C'est on ne peut plus simple :

Code :

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

1
2
3
4
5
6
7
8
9
> library(tcltk)
Chargement de Tcl/Tk... terminé

> ?tkchooseDirectory

> dir <- tclvalue(tkchooseDirectory())

> dir
...

Plus directement

Code :

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

setwd(tclvalue(tkchooseDirectory()))

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