1029 résultats trouvés

Aller à la recherche avancée

par Pierre-Yves Berrard
07 Oct 2018, 18:38
Forum : Questions en cours
Sujet : commande pour condition
Réponses : 6
Vues : 1847

Re: commande pour condition

Code : Tout sélectionner

grepl("210", df$variable)
par Pierre-Yves Berrard
28 Sep 2018, 13:23
Forum : Questions en cours
Sujet : Boucle Chi2/Fisher
Réponses : 4
Vues : 1223

Re: Boucle Chi2/Fisher

Il y a une virgule en trop à l'intérieur des crochets.
par Pierre-Yves Berrard
28 Sep 2018, 12:53
Forum : Questions en cours
Sujet : Boucle Chi2/Fisher
Réponses : 4
Vues : 1223

Re: Boucle Chi2/Fisher

Bonjour,

Pour la première erreur qui apparaît :

Code : Tout sélectionner

> for(i in 6:1148)test[,i]=as.factor(test[,i])

Remplacer test[,i] par test[[i]].
(car test[,i] est un data.frame d'une seule colonne, donc une liste)
par Pierre-Yves Berrard
27 Sep 2018, 08:50
Forum : Questions en cours
Sujet : Identification des paiements.
Réponses : 13
Vues : 2816

Re: Identification des paiements.

Bonjour,

Code : Tout sélectionner

brice_df <- data.frame(
  Contrat = rep(names(brice), lengths(brice)),
  ID      = unlist(brice, use.names = FALSE),
  stringsAsFactors = FALSE
)

Attention, les nombres dans ID seront convertis en caractères (car une colonne ne peut avoir qu'un type).
par Pierre-Yves Berrard
25 Sep 2018, 13:25
Forum : Questions en cours
Sujet : Identification des paiements.
Réponses : 13
Vues : 2816

Re: Identification des paiements.

Ça me rassure sur mes capacité intellectuelles...

Sinon, le reste est bien présenté, donc on pourra aider après éclaircissement sur cette phrase un peu obscure.
par Pierre-Yves Berrard
25 Sep 2018, 12:20
Forum : Questions en cours
Sujet : Identification des paiements.
Réponses : 13
Vues : 2816

Re: Identification des paiements.

Bonjour, Mon problème est que je veux ramener la colonne ID au niveau de la base PAIEMENT de sorte que tant que Contrat de PAIEMENT est A et que la somme des prime de PAIEMENT pour CONTRAT=A ne vaut pas Estimation de la ligne 1 de la base AVANCE c'est à dire la première valeur de l'estimation de la ...
par Pierre-Yves Berrard
14 Sep 2018, 10:24
Forum : Questions en cours
Sujet : supprimer les chiffres consecutifs qui se repetent
Réponses : 10
Vues : 4346

Re: supprimer les chiffres consecutifs qui se repetent

Bonjour

Une fonction que j'avais créée pour répondre à la même problématique :

Code : Tout sélectionner

rm_following_double <- function(x) {
  if (anyNA(x)) stop("impossible : valeur(s) manquante(s)")
  garde <- x[-1] != x[-length(x)]
  x[c(garde, TRUE)]
}
par Pierre-Yves Berrard
14 Sep 2018, 09:43
Forum : Questions en cours
Sujet : Créer un tableau après une requête tapply(.,.,summary) ?
Réponses : 9
Vues : 8789

Re: Créer un tableau après une requette tapply(.,.,summary) ?

Bonjour,

Le plus simple serait d'utiliser aggregate qui renvoie un data.frame :

Code : Tout sélectionner

aggregate(data = toto, cbind(produit, sable) ~ Compose, sum)
par Pierre-Yves Berrard
04 Sep 2018, 21:43
Forum : Questions en cours
Sujet : Manipulation data : calcul abondance par site quand une ligne par espèce
Réponses : 2
Vues : 1546

Re: Manipulation data : calcul abondance par site quand une ligne par espèce

Si j'ai bien compris, il s'agit d'un comptage.

Code : Tout sélectionner

as.data.frame(table(mon_data$Site, mon_data$Especes))
ou

Code : Tout sélectionner

dplyr::count(mon_data, Site, Especes)
par Pierre-Yves Berrard
31 Aoû 2018, 10:11
Forum : Questions en cours
Sujet : Découpage matrice
Réponses : 3
Vues : 789

Re: Découpage matrice

L'astuce est surtout de calculer "debuts" et "fins", après quoi une boucle for serait également assez simple. n <- length(replicats) liste_corr_repl <- vector(mode = "list", length = n) for (i in 1:n) liste_corr_repl[[i]] <- mat_corr[debuts[i]:fins[i], debuts[i]:fins[i]]
par Pierre-Yves Berrard
30 Aoû 2018, 19:56
Forum : Questions en cours
Sujet : Découpage matrice
Réponses : 3
Vues : 789

Re: Découpage matrice

Bonsoir,

Une fonction *apply permet de se passer des boucles avec index :

Code : Tout sélectionner

fins <- cumsum(replicats)
debuts <- fins - replicats + 1

liste_corr_repl <-
  mapply(
    function(m, n) mat_corr[m:n, m:n],
    debuts,
    fins
  )
par Pierre-Yves Berrard
30 Aoû 2018, 07:56
Forum : Questions en cours
Sujet : limites d'échelles spécifiques à chque couche dans ggplot2
Réponses : 3
Vues : 1006

Re: limites d'échelles spécifiques à chque couche dans ggplot2

Je suis à peu près sûr qu'Hadley Wickham a déclaré ne pas vouloir implémenter des graphiques à échelle multiple dans ggplot2.
par Pierre-Yves Berrard
28 Aoû 2018, 08:38
Forum : Questions en cours
Sujet : [Résolu] Noms et profondeurs d'une liste imbriquée
Réponses : 3
Vues : 843

Re: [Résolu] Noms et profondeurs d'une liste imbriquée

Merci beaucoup François, ta solution simplifie considérablement mon code.
Ça valait le coup d'attendre !
par Pierre-Yves Berrard
27 Aoû 2018, 20:17
Forum : Questions en cours
Sujet : Identifier l'évolution dans le temps d'une variable factorielle
Réponses : 2
Vues : 754

Re: Identifier l'évolution dans le temps d'une variable factorielle

Code : Tout sélectionner

apply(
  db[paste0("atb_J", 1:30)],
  1,
  which.min
)
donnerait le jour du premier zéro pour chaque ligne.

Non testé.
par Pierre-Yves Berrard
27 Aoû 2018, 19:19
Forum : Questions en cours
Sujet : débutant R6
Réponses : 7
Vues : 1550

Re: débutant R6

Par contre, je n'aurais pas placé conjugate en "active" (sert à définir des sortes de champs dynamiques) mais plutôt dans les méthodes "public".
(tu peux aussi supprimer self$re <- self$re;)

Aller à la recherche avancée