1029 résultats trouvés

Aller à la recherche avancée

par Pierre-Yves Berrard
02 Aoû 2016, 08:20
Forum : Questions en cours
Sujet : Version payante de R
Réponses : 5
Vues : 2658

Re: Version payante de R

Alexandre Dangléant a écrit :[...]R en lui-même est sous licence GNU GPL. Donc en tant que tel il ne peut y avoir de "version payante" il me semble...

Si (en théorie).
https://fr.wikipedia.org/wiki/Licence_p ... _de_source
par Pierre-Yves Berrard
01 Aoû 2016, 23:43
Forum : Questions en cours
Sujet : ggplot problème de groupe
Réponses : 3
Vues : 1483

Re: ggplot problème de groupe

C'est parce qu'après ton calcul de moyennes, x est devenu caractère (un effet collatéral de tapply ). J'ai trouvé l'erreur en essayant de simplifier le code avec tapply et gather: library(dplyr) dta2 <- dta %>% group_by(Polluant, x) %>% summarise(Valeur = mean(Valeur, na.rm = TRUE)) (sinon tu peux j...
par Pierre-Yves Berrard
29 Juil 2016, 08:07
Forum : Questions en cours
Sujet : lapply en fonction de plusieurs attributs
Réponses : 13
Vues : 4144

Re: lapply en fonction de plusieurs attributs

Jocelyn Carré a écrit :J'ai plus une question de curiosité qu'autre chose : si vous avez appelé la liste "list_df", c'est parce que l'abréviation "df" correspond à quelque chose en particulier ? " Default" ?

data.frame !
;-)
par Pierre-Yves Berrard
28 Juil 2016, 14:54
Forum : Questions en cours
Sujet : lapply en fonction de plusieurs attributs
Réponses : 13
Vues : 4144

Re: lapply en fonction de plusieurs attributs

Bonjour, En revenant à la fonction split avec l'option drop=TRUE qui supprime les croisements vides à la source : list_df <- split( mydata, list(mydata$species, mydata$organ), drop = TRUE ) for (nom in names(list_df)) assign(nom, list_df[[nom]]) rm(list_df, nom) Il y a peut-être une façon de faire a...
par Pierre-Yves Berrard
26 Juil 2016, 12:30
Forum : Questions en cours
Sujet : copie de write.table
Réponses : 2
Vues : 964

Re: copie de write.table

Bonjour, write.table( liste, file=liste_fichier) Ce serait trop beau ! En fait, ce n'est guère plus compliqué : mapply(FUN = write.table, MoreArgs = list(dec=".", sep=";"), liste, liste_fichier) MoreArgs contient les paramètres de la fonction write.table (à adapter)
par Pierre-Yves Berrard
21 Juil 2016, 12:03
Forum : Questions en cours
Sujet : sélection de données en fonction de dates
Réponses : 1
Vues : 1258

Re: sélection de données en fonction de dates

#ensuite extraction des patients pour les lesquels réponse TRUE au critère de sélection (toutes années confondues) selec<-subset(patients, v==TRUE) C'est là que ça coince, à mon avis (pas regardé la suite). v est un vecteur de booléens (et v==TRUE est la même chose que v) Donc subset(patients, v) p...
par Pierre-Yves Berrard
21 Juil 2016, 09:12
Forum : Questions en cours
Sujet : calcul de jours glissants avec condition
Réponses : 17
Vues : 3878

Re: calcul de jours glissants avec condition

À quoi ressemblent les données de départ, quel est le code R utilisé et quel est le résultat souhaité ? Sans ces éléments, toute aide est impossible. Si le problème est distinct du sujet initial, il serait intéressant de créer un nouveau fil de discussion avec un titre explicite et un exemple reprod...
par Pierre-Yves Berrard
20 Juil 2016, 12:47
Forum : Questions en cours
Sujet : Dimension longitudinale : extraction de données
Réponses : 5
Vues : 1600

Re: Dimension longitudinale : extraction de données

A quel niveau et quel bout de code dois-je rajouter pour ajouter cette précision concernant le critère de sélection ? Bonjour, Il faut préciser à chaque fois le nom de la colonne : menages <- fun(table1$idmenc, table2$idmenc, table3$idmenc) # La selection a <- table1[match(menages, table1$idmenc, n...
par Pierre-Yves Berrard
14 Juil 2016, 11:08
Forum : Questions en cours
Sujet : calcul de jours glissants avec condition
Réponses : 17
Vues : 3878

Re: calcul de jours glissants avec condition

Fusionner une table avec un vecteur de booléens ne risque pas de donner grand chose...

(à noter que date7jours9(2012) renverra systématiquement FALSE)
par Pierre-Yves Berrard
13 Juil 2016, 12:16
Forum : Questions en cours
Sujet : Croiser deux tableaux
Réponses : 8
Vues : 2506

Re: Croiser deux tableaux

Ah, je croyais que la variable s'appelait aussi CIM10.

Du coup :

Code : Tout sélectionner

cardio2 <- merge(cardio, CIM10, by = "Si_code_p", all.x = TRUE)
par Pierre-Yves Berrard
13 Juil 2016, 12:10
Forum : Questions en cours
Sujet : Croiser deux tableaux
Réponses : 8
Vues : 2506

Re: Croiser deux tableaux

Charles Marcucci a écrit :Peut-être que je me suis mal exprimé.
Non, je pense que j'avais bien compris.

Comment s'appellent les variables du dataframe CIM10 ?
Que donne l'exécution de l'instruction merge ? Un message d'erreur ?
par Pierre-Yves Berrard
13 Juil 2016, 10:38
Forum : Questions en cours
Sujet : Croiser deux tableaux
Réponses : 8
Vues : 2506

Re: Croiser deux tableaux

Bonjour,

Code : Tout sélectionner

cardio2 <- merge(cardio, CIM10, by = "CIM10", all.x = TRUE)

On aurait pu aussi créer un facteur avec les paramètres levels et labels appropriés.
par Pierre-Yves Berrard
13 Juil 2016, 10:21
Forum : Questions en cours
Sujet : calcul de jours glissants avec condition
Réponses : 17
Vues : 3878

Re: calcul de jours glissants avec condition

Cela semblait marcher hier après avoir ajouté !is.na(...).
Y2015 et Y2015.1 c'est la même chose ?
par Pierre-Yves Berrard
13 Juil 2016, 08:12
Forum : Questions en cours
Sujet : calcul de jours glissants avec condition
Réponses : 17
Vues : 3878

Re: calcul de jours glissants avec condition

Mon dernier message ne donne pas le résultat escompté ?
par Pierre-Yves Berrard
12 Juil 2016, 21:19
Forum : Questions en cours
Sujet : calcul de jours glissants avec condition
Réponses : 17
Vues : 3878

Re: calcul de jours glissants avec condition

L'information "selection" concerne le patient, pas le questionnaire. Il paraît donc logique de garder une table à part. Si vous voulez malgré tout faire figurer l'info dans la table patients (le client est roi !) : selection0 <- tapply(patients$Y2015.1, patients$id, dates7jours9) # (vecteu...

Aller à la recherche avancée