Discussion :

[MJanvier]

Bonjour,

Je viens de terminer un petit bout de code fort simple dont le but est d'ouvrir un fichier, réaliser des opérations dessus, modifier le fichier puis créer un 2eme fichier (création dans le même répertoire).

La première ligne de mon code choisit un répertoire avec setwd() puis ma 2eme ligne lit le fichier voulu avec read()Je voudrais remplacer ces 2 lignes par une boite de dialogue du même genre que celles que l'on trouve pour ouvrir un fichier sous open office ou autre.

Une fois fait, j'aimerais créer un fichier exécutable pour utiliser le code.

Il suffira alors de lancer le programme, de sélectionner le fichier dans la fenêtre ouverte, et de cliquer sur "ok" pour que le calcul se fasse.

Je suis très embêté par mon niveau de débutant en R comme en C, et j'ignore si je dois incorporer mon code r à un autre code en c, ou si r permet de faire tout ça.

Et le plus gros de mon problème est que je ne parviens pas à déchiffrer les quelques tutos en anglais que j'ai pu trouver par-ci par-là.

Quelqu'un pourrait-il me conseiller, voire me lister les fonctions à utiliser?

Merci par avance.

MJanvier

[coyott]

Bonjour,

Voyons si un débutant comme moi peut t'aider...
Utilise la librairie rgtk2 voir gWidgetsRGtk2 (la seconde utilise la première) et regarde les tuto sur ces packages http://cran.r-project.org/web/packag...s/gWidgets.pdf.

Voici un code exemple qui ouvre une boite de dialogue pour choisir un chemin de fichier et l'affiche. Ca devrait te mettre sur les rails.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
library(RGtk2)
library(gWidgetsRGtk2)
#création fenêtre générale
mainWin<-gwindow("Fenetre principale")	
#création d'un group dans la fenêtre	
mainGroup<-ggroup(horizontal = FALSE, container=mainWin)
#création d'un label avec écrit chemin fichier
labelFileSource<-glabel("Fichier :",container=mainGroup)
#création d'un edit text
							edFileSource<-gedit("chemin fichier", container=mainGroup)
#création d'un bouton qui lance la fonction choose.files() et qui utilise la valeur pour la placer dans l'edit text
							bChoseFile<-gbutton("...", container=mainGroup,handler = function(h,...)  svalue(edFileSource)<-choose.files())

En espérant que ca te mette sur la voie bon courage.

[MJanvier]

Alors là super!
ça marche parfaitement, et mieux le tuto et le package sont géniaux!
Je vais essayer de personnaliser un peu l'affichage apparement il y a de quoi jouer un bon moment. Merci beaucoup!


Sinon personne ne sais compiler un exe? J'ai regardé s'il existait un package, mais ça n'a pas l'air (à vérifier, c'était ma 1ere recherche)