666 résultats trouvés

Aller à la recherche avancée

par Eric Casellas
26 Sep 2018, 08:14
Forum : Questions en cours
Sujet : Identification des paiements.
Réponses : 13
Vues : 349

Re: Identification des paiements.

Merci pour les codes, il marchent. Cependant pouvez-vous m'apporter plus d'explication sur les lignes des codes car je dois l'appliquer à mon cas ( des base de près de 1 000 000 de lignes). Merci Tu peut préciser stp ce sur quoi tu veux des explications? Sinon en gros la 1ere boucle traite des diff...
par Eric Casellas
25 Sep 2018, 15:02
Forum : Questions en cours
Sujet : Identification des paiements.
Réponses : 13
Vues : 349

Re: Identification des paiements.

Bonjour, Voici une proposition de code qui fait ce que tu demande sur la base de ton exemple, par contre c'est loin d'être optimal et il y a surement plus joli à faire... AVANCES <- data.frame(ID=1:6, Contrat=c("A", "A", "B", "B", "C", "C")...
par Eric Casellas
25 Sep 2018, 13:29
Forum : Questions en cours
Sujet : Identification des paiements.
Réponses : 13
Vues : 349

Re: Identification des paiements.

Bonjour,

J'ai plus ou moins réussi à comprendre ce que tu veux (pas à partir de tes phrases mais de ton exemple de sortie attendue), a priori tu as plus un soucis de formalisation de ton d'algorithme que de langage info/R

Eric
par Eric Casellas
14 Sep 2018, 14:20
Forum : Questions en cours
Sujet : supprimer les chiffres consecutifs qui se repetent
Réponses : 10
Vues : 1704

Re: supprimer les chiffres consecutifs qui se repetent

Bonjour, une solution avec le package dplyr : library(dplyr) X <- data.frame(A=LETTERS[1:14], B=c(1,1,1,600,3,4,9,3,3,3,3,1,3,650)) first_occur<-function(x) x!=lead(x, default="") ligne<-first_occur(X[ ,2]) X[ligne,] A B 3 C 1 4 D 600 5 E 3 6 F 4 7 G 9 11 K 3 12 L 1 13 M 3 14 N 650 Serge ...
par Eric Casellas
14 Sep 2018, 13:14
Forum : Questions en cours
Sujet : supprimer les chiffres consecutifs qui se repetent
Réponses : 10
Vues : 1704

Re: supprimer les chiffres consecutifs qui se repetent

Une proposition rapide (mais il y a surement mieux à faire en terme de temps d'execution que ma boucle for) X <- data.frame(A=LETTERS[1:14], B=c(1,1,1,600,3,4,9,3,3,3,3,1,3,650)) myrle <- rle(X$B)$lengths indexes <- c(1) for (repnum in myrle[-length(myrle)]) { indexes <- c(indexes, indexes[length(in...
par Eric Casellas
14 Sep 2018, 11:39
Forum : Questions en cours
Sujet : supprimer les chiffres consecutifs qui se repetent
Réponses : 10
Vues : 1704

Re: supprimer les chiffres consecutifs qui se repetent

Bonjour,

A priori la fonction rle fait ce que tu veux :

Code : Tout sélectionner

rle(c(1,1,1,600,3,4,9,3,3,3,3,1,3,650))$values


Eric
par Eric Casellas
13 Sep 2018, 15:57
Forum : Questions en cours
Sujet : transformer de 1 à 001
Réponses : 3
Vues : 517

Re: transformer de 1 à 001

Salut,

Sinon il y aussi la fonction str_pad du paquet stringr qui permet de faire la même chose

Code : Tout sélectionner

library(stringr)
x <- 1:15
str_pad(x, 3, pad = "0")


Eric
par Eric Casellas
13 Sep 2018, 15:48
Forum : Questions en cours
Sujet : [RESOLU][Linux] changer la police par défaut des graphiques en Helvetica
Réponses : 2
Vues : 290

Re: [Linux] changer la police par défaut des graphiques

Salut,

Je n'ai pas vraiment testé, mais voici un lien avec une suggestion d'utilisation d'un paquet extrafont : https://www.r-bloggers.com/how-to-use-your-favorite-fonts-in-r-charts/

Eric
par Eric Casellas
06 Sep 2018, 10:27
Forum : Questions en cours
Sujet : Pb Affichage ProgressBar
Réponses : 4
Vues : 113

Re: Pb Affichage ProgressBar

Bonjour,

Ca fait longtemps que je n'ai plus utilisé le paquet tcltk2 mais il me semble me souvenir qu'un appel à Sys.sleep(0); permet de forcer la rafraîchissement dans certains cas, je ne sais pas si ça fonctionne pour ta situation (n'ayant pas de code reproductible à tester)...

Eric
par Eric Casellas
14 Aoû 2018, 15:13
Forum : Questions en cours
Sujet : établir un gradient "hétérogène" de couleurs sur raster
Réponses : 2
Vues : 133

Re: établir un gradient "hétérogène" de couleurs sur raster

Bonjour,

A priori il te faut utiliser le paramètre breaks pour spécifier les limites utilisées par ton vecteur de couleur.

par exemple:

Code : Tout sélectionner

plot(sol2, col=colors, breaks=c(seq(0, 8, length.out = 28), maxValue(sol2)))
par Eric Casellas
25 Juil 2018, 15:17
Forum : Questions en cours
Sujet : Programmer une fonction à coefficients variables
Réponses : 4
Vues : 215

Re: Programmer une fonction à coefficients variables

Bonjour, voici 2 propositions avec l'hypothèse que les coeff a, b, .. ne prennent que des valeurs entières (sinon il y a une infinité de possibilités, en tout cas il faut au moins discrétiser le nombre de valeurs) mydta <- data.frame(A=rnorm(100), B=rnorm(100)) note <- function(dta, a,b) { a*dta$A- ...
par Eric Casellas
24 Juil 2018, 14:23
Forum : Questions en cours
Sujet : empêcher l'extrapolation d'une droite de régression
Réponses : 3
Vues : 129

Re: empêcher l'extrapolation d'une droite de régression

Bonjour, regarde du coté de la fonction clip (à utiliser entre ta fonction de plot et abline) ou alternativement segments ou lines en remplacement de abline... exemples : plot(1:10) abline(0,1) plot(1:10) segments(1,1,10,10) plot(1:10) lines(c(1,10), c(1,10)) plot(1:10) clip(1,10,1,10) abline(0,1) E...
par Eric Casellas
13 Juil 2018, 10:14
Forum : Questions en cours
Sujet : Plotting means and error bars
Réponses : 1
Vues : 93

Re: Plotting means and error bars

Bonjour,

J'imagine que ça viens de moi mais je n'ai pas vu de question dans ton post...
Et sinon le code que tu met n'étant pas reproductible, difficile d'en faire quoi que ce soit de notre coté (voir http://forums.cirad.fr/logiciel-R/viewtopic.php?f=1&t=7638).

Eric
par Eric Casellas
12 Juil 2018, 10:13
Forum : Questions en cours
Sujet : Package emmeans et cld "incompatible object emmgrid"
Réponses : 4
Vues : 133

Re: Package emmeans et cld "incompatible object emmgrid"

Justement ces fonctions font parties du package "emmeans" et lors de son installation, la console m'affiche : Attachement du package : ‘multcomp’ The following object is masked from ‘package:emmeans’: cld Ben du coup cela veux dire que tu utilise la fonction cld du paquet multcomp et non ...

Aller à la recherche avancée