Groupe des utilisateurs du logiciel R

Bonjour, Merci Pierre-Yves de t'intéresser à mon problème. Ta solution fonctionne dans le 1er exemple, mais il s'avère qu'il était trop simplifié pour illustrer mon problème. Avec ce nouvel exemple, ta solution ne fonctionne plus (PI je suis allé jusqu'à n=10 et pas de changements). As-tu d'autres i...

Bonjour, Une autre piste avec signif(). Même si l'aide de la fonction ne le dit pas, 'digits' accèpte plusieurs valeurs. Cependant, chaque 'digits' correspond à une ligne et non une colonne comme tu le souhaites... signif(head(mtcars[,c("drat","wt","qsec")]), digits=nb_...

Bonjour, Selon ce que je comprend de la fonction tkmessageBox() de la librairie tcltk, quand un tkmessageBox() est lancé, il doit être fermé pour que la console soit de nouveau accessible. Ainsi je pensais qu'aucun appel à R n'était possible après avoir ouvert un tkmessageBox() avant de l'avoir ferm...

Bonjour, Lors de l'évaluation d'une fonction, je souhaite avoir accès aux objets de l'environnement précédent. Un exemple pour tenter d'être plus explicite : fun1 <- function(x) eval(parse(text=x)) fun2 <- function() { aaa <- 1 fun1("ls(envir=environment(fun2))") } bbb <- c(2, "BlaBla...

Bonjour, A la vue du graphique, je miserais sur la fonction points() pour faire le graphique. Voici un enchaînement de fonction qui devrait reproduire ton graphique (je te laisse le soin de remplir les fonctions) : plot(...) # pour intialiser le graphique points(...) # pour les points noirs ou rouge...

Bonjour,

Donne quelques résultats ...

HTH,
Bastien

Bonjour,

Une alternative à tester :

HTH,
Bastien

Bonjour, Je souhaite créer une fonction qui réalisera certaines actions si une erreur se produit. Voici mon premier essai : TRY <- function(EXPR) { tryCatch(EXPR, error=function(c) { cat("There was at least one error when the following code was executed:\n", rep("-", times=30), &...

Bonjour, L'auteur du package cogena m'a répondu. Pour information, la solution est d'expliciter la production du graphe via print(). { jpeg(file="_Test3.jpg", width=10, height=8, units="in", res=150) print(heatmapPEI(clen_res, "kmeans", "2")) dev.off() } Cette...

Bonjour, Loin d'avoir la solution optimale, je te conseillerais de faire un tour du coté de la fonction rgeos:::gIntersection(). Je m'étais servis de cette fonction pour intersecter des points et des lignes. Je crois me rappeler qu'il m'avait fallu 'agrandir' les points pour qu'ils touchent les lign...

Bonjour, Comme tu souhaites un input de l'utilisateur au milieu de ton script pour renseigner le nom d'un fichier, voici une autre solution : donnees <- read.csv2(file=file.choose()) Ca t'ouvres une boîte de dialogue dans laquelle tu vas chercher ton fichier csv à lire, et attend l'action de l'utili...

Bonjour, En grande majorité du temps superposer graphiquement des données n'ayant pas les même unités n'est pas recommandé, il vaut mieux faire des graphes séparé. Par exemple, tu peux mettre tes trois graphes sur une même colonne : par(mfrow=c(3,1)) plot(rnorm(n=100, mean=1, sd=1), col=2) plot(rnor...

Bonjour,

A chaque fois que tu utilises write.table, R écrase le fichier existant. Pour contrer ce comportement, tu as l'option 'append'.
Avec append=TRUE dans write.table, tu devrais avoir ce que tu cherches.

HTH,
Bastien

Bonjour, Pour le nom des colonnes, tu peux essayer l'argument check.names=FALSE. Ainsi R ne change pas en points les caractères qu'il n'aime pas dans les noms des colonnes. Pour les cellules, ce sera surement l'argument encoding, comme Maxime t'as dit dans le précédent post. Si latin1 ne marche pas,...

Bonjour, Ton argument fixed=TRUE te permet de dire à gsub que les caractères spéciaux doivent être interprétés comme du caractère et non des caractères spéciaux. De fait, avec l'exemple de Serge : texte<-"aa}{bb" gsub("\\}\\{","\\};;\\{",texte) gsub("}{", &quo...