Discussion :

[kaleme]

Bonjour,

Question 1 :
Lorsque je lance un script sous R, est-il possible de connaître le chemin de ce fichier?
Mon script R permet de lancer plusieurs programmes contenus dans un dossier qui est situé au même niveau ou en dessous de lui dans l'arborescence.
Pour le moment, j'utilise les fonctions

Code :

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

 setwd() et getwd()

mais le chemin est en dur donc dès que je change d'ordinateur, il me faut le modifier manuellement.

Question 2:
Comment supprimer toutes les variables, de mon environnement, commençant par un certain motif (ex: toto*)?

Merci d'avance pour vos réponses.

[poussein]

Salut je ne comprends pas trop ton problème...

Si tu as un dossier de travail (Work_Folder), qui contient les sous dossiers titi, toto et tata

Lorsque tu lance ta procédure tu récupères ton chemin garce à

Code :

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

my_path <- getwd()

chacun des sous dossiers sera alors accessible par

Code :

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

1
2
paste(my_path,"/toto",sep="")
etc ...

J'imagine que ce n'est pas ce que tu demandes, mais je ne vois pas trop où est ton soucis...

Une autre solution serait d'aller taper dans les variables d'environnement, mais il faut avoir de bonnes raisons pour cela ...

Poussein ./.

[kaleme]

Merci pour ta réponse.
imaginons que mon Workspace est situé à cette adresse " ~/workspace/language_R/ " mais que je souhaite lancer un script qui n'est pas dans ce Workspace ( par exemple " ~/workspace/test/ ")
J'aimerais pouvoir récupérer l'adresse d'où le script est lancé indépendamment du workspace donc récupérer : " ~/workspace/test/ "
Je ne sais pas si c'est possible.

[mamounMob]

Question 1 :
n'utilise pas les chemins absolus, mais plutôt les chemins relatifs, exemple : './MonDossier/MonScript.R'
le './' représente ton répertoire courant, donc si tu changes de PC, tu lanceras toujours ton script de cette façon.

Question 2 :
exemple :

Code :

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

1
2
3
4
5
6
7
8
9
 
x1 <- x2 <- x3 <- y <- 1
ls()
# [1] "x"  "x1" "x2" "x3" "y" 
> ls(pattern='x.*')
# [1] "x"  "x1" "x2" "x3"
 rm(list=ls(pattern='x.*')) # supprime les variables commençant par 'x', pour plus de détails voir les expressions régulières
ls()
# [1] "y"

[kaleme]

Merci pour ces réponses.