Groupe des utilisateurs du logiciel R

Merci beaucoup Maxime, ca correspond à mes attentes, le processus s'interrompe au bout de 5 sec (par exemple), mais l'expression et a nouveau réévalué indéfiniment (sans timeout) juste après. Mais merci beaucoup, c'est proche du résultat attendu. Je dois bidouiller encore un peu. Merci beaucoup pour...

Et en quoi R.utils::withTimeout() ne répond pas à la problématique ? Apparemment elle n'est pas prévu pour ça :( (https://rdrr.io/cran/R.utils/man/withTimeout.html) Furthermore, it is not possible to interrupt/break out of a "readline" prompt (e.g. readline() and readLines()) using timeou...

Bonjour, Merci pour le retour :) je ne suis pas fan de réinventer la roue, je vais rester sur ce qui existe nativement dans R Moi aussi. C'est juste que ce qui est proposé nativement ne repond pas à mes besoins. En fait je souhaite utilisé la fonction readline() et pas readLines() . readline() perme...

Bonjour, Je souhaite utiliser la fonction readline() avec un "timeout" de mannière a arreter le processus si pas de réponse au bout de x seconde. J'ai trouvé cette fonction qui apparement fonctionne sur linux (je ne l'ai pas testé): timeout<-function(expr, seconds = 60){ killer.pid <- syst...

Bonjour Mickael,

J'ai résolu mon problème. En fait il s'agissait d'un "bête" problème d'ordre dans le code.
Merci :)

Bonne journée.

Stéphane

Bonjour, Je souhaite créer une interface avec shiny. J'arrive à importer des données et créer des graphes de manière dynamique. Je souhaiterais aussi gérer les "xlim" et "ylim" de manière dynamique. Mon code type est : Coté server ... output$toxlim <- renderUI({ max_x<-c(max(data...

Merci Bastien, ça marche aussi très bien.
Je ferais au plus simple. Il faudra que je mette cette fonction dans une autre. La "soustraction" est la premiere partie de l'analyse de mes data, mais c'était aussi la partie la plus compliqué pour moi.

Merci à tout les 2.

Bonne journée.

Stéphane

Bonjour,

Tout est bon, en fait j'ai compris, et ça marche super bien. Merci beaucoup ;)

Bonne journée.

Stéphane

Merci Mickael pour ton aide. Concernant la fonction "fonction0", c'est une manière d'écrire dont je n'ai pas l'habitude (j'ai commencé depuis peu à ecrire mes propre fonction pour automatiser certaine tâche), mais je la comprend. De pus elle marche. Pour la fonction "fonction1", ...

Bonjour Mickael, Merci de la réponse. Je souhaite utiliser ces fonctions avec des data d'un fichier csv. Mais voici quelque chose de reproductible : chan_a<-c(2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,4,4,4,4,4,4,4,NA,NA,NA,NA,NA,NA,NA,NA,NA) test1_a<-c(1686.729,2097.048,1283.899,943.882,1213.855,3225.202,364...

Bonjour, J'ai cette fonction qui me permet de soustraire une valeur donnée au autre valeurs d'un data frame "splitté" : fonction<-function(x,y,fl){ df <- data.frame(x, fl, y) sp <- split(df, y) difference <- lapply(sp, function(x) x$x - x$x[x$fl==2]) a=data.frame(na.omit(df, unlist(differe...

J'ai résolu mon problème.
Pour ceux qui serait dans le même cas, le nom des lignes (dans mon cas) doivent être les mêmes entre les matrices "mat4" et "reslt" (en tout cas, ça marche maintenant, un truc tout bête :) ) !!

Bonne soirée.

Stéphane

Bonjour, Cela fait plusieurs jours (voir semaines) que je n'arrive pas à regler mon problème. Dans un premier temps, j'ai dans une fonction, une partie de mon code qui va créer des vecteurs : for (i in cond){ for (j in x){ mat4=matrix(assign(pos=1,paste(j,i,rq,sep=""),mate2[,j][grep(patter...

Merci Gabriel, ton code marche super bien ;) .

Merci à tous pour votre aide.

Stéphane

Merci Pierre-Yves et Serge. En fait, mon code initial était : new_data<-function(data){ vector_table_chan=as.vector(table(chan)) bg_fluo=data[is.na(fluo)==T] vector_bg_fluo=rep(bg_fluo,vector_table_chan) reslt_fluo_net<-c(data-vector_bg_fluo) return(reslt_fluo_net) } Il marche parfaitement bien. Je ...