32 résultats trouvés

Aller à la recherche avancée

par Michaël Delorme
12 Fév 2019, 14:31
Forum : Questions en cours
Sujet : Carte simple sous R
Réponses : 7
Vues : 149

Re: Carte simple sous R

Merci pour le retour !
par Michaël Delorme
07 Fév 2019, 09:17
Forum : Questions en cours
Sujet : Carte simple sous R
Réponses : 7
Vues : 149

Re: Carte simple sous R

Ressource assez complète avec les packages à la mode... https://www.r-spatial.org/r/2018/10/25/ggplot2-sf.html Ça donnerait qqchose comme : library("tidyverse") library("sf") read_sf("monshapefile.shp") %>% st_transform(2154) %>% left_join(mon_df, by = "code_parcel...
par Michaël Delorme
21 Jan 2019, 10:52
Forum : Questions en cours
Sujet : % de similarité
Réponses : 3
Vues : 179

Re: % de similarité

Il s'agit de distance de Hamming dans ce cas particulier (chaînes de même longueur). library(stringdist) a <- "AZERTTYUIO" b <- "AZEFRTYUIO" dist <- stringdist(a, b, method = "hamming") (nchar(a) - dist) / nchar(a) * 100 https://fr.wikipedia.org/wiki/Distance_de_Hamming...
par Michaël Delorme
15 Jan 2019, 08:22
Forum : Questions en cours
Sujet : Camembert avec étiquettes "sur le bord"
Réponses : 4
Vues : 158

Re: Camembert avec étiquettes "sur le bord"

> fortunes::fortune(109) Evelyn Hall: I would like to know how (if) I can extract some of the information from the summary of my nlme. Simon Blomberg: This is R. There is no if. Only how. -- Evelyn Hall and Simon 'Yoda' Blomberg R-help (April 2005) Par exemple avec ggrepel (et le paramètre nudge_x)...
par Michaël Delorme
03 Déc 2018, 07:24
Forum : Questions en cours
Sujet : Fonction count sur données groupées
Réponses : 2
Vues : 171

Re: Fonction count sur données groupées

count() appelle déjà group_by().

Il suffit donc de faire :

Code : Tout sélectionner

 count(df, site, session, piege)
par Michaël Delorme
16 Aoû 2018, 09:39
Forum : Questions en cours
Sujet : liste dans df
Réponses : 2
Vues : 380

Re: liste dans df

Comme dit ci-dessus, c'est difficile de répondre sans un exemple reproductible, mais unnest() du package tidyr devrait pouvoir aider...
par Michaël Delorme
10 Aoû 2018, 06:56
Forum : Questions en cours
Sujet : Impossible de lire une table avec RJDBC
Réponses : 2
Vues : 263

Re: Impossible de lire une table avec RJDBC

Je ne connais pas avec RJDBC et Sybase, mais si c'est similaire à ce qui se passe avec RPostgreSQL (basé aussi sur DBI, comme RJDBC) et PostgreSQL, il faut peut-être écrire :

Code : Tout sélectionner

dbReadTable(conn, c("DWH_PRD", "DWH_CRMCAMPAGNE"))
par Michaël Delorme
17 Juil 2018, 12:07
Forum : Questions en cours
Sujet : Concours estival
Réponses : 20
Vues : 1509

Re: Concours estival

Le plus évident pour commencer (si j'ai bien compris) :-) > microbenchmark::microbenchmark(rowSums(dta)) Unit: milliseconds expr min lq mean median uq max neval rowSums(dta) 7.936299 8.505044 9.234051 8.773643 9.123363 39.63762 100
par Michaël Delorme
31 Mai 2018, 05:53
Forum : Questions en cours
Sujet : Rose de pollution
Réponses : 2
Vues : 263

Re: Rose de pollution

Voir les packages CircStats, circular... et par exemple la fonction CircStats::circ.mean()
par Michaël Delorme
09 Avr 2018, 09:32
Forum : Questions en cours
Sujet : Leaflet et Geoportail
Réponses : 3
Vues : 1206

Re: Leaflet et Geoportail

Pour les couches IGN du Géportail (ceci répond au titre de la question mais pas tout à fait au contenu de la question initiale qui utilise des couches du BRGM, mais cela peut servir aux personnes qui viennent de moteurs de recherche !)... Il faut bien indiquer la clé d'API IGN et les paramètres de l...
par Michaël Delorme
26 Mar 2018, 06:21
Forum : Questions en cours
Sujet : séparer l'heure d'une date
Réponses : 5
Vues : 1223

Re: séparer l'heure d'une date

Le package hms, avec lubridate, permet de manipuler des heures seules :

Code : Tout sélectionner

> library(lubridate)
> library(hms)
> hms::as.hms(hms::as.hms("10:45:00") + dminutes(20))
11:05:00
par Michaël Delorme
13 Mar 2018, 10:54
Forum : Questions en cours
Sujet : un problème d'expression régulière
Réponses : 5
Vues : 633

Re: un problème d'expression régulière

Code : Tout sélectionner

x <- "3037//1922 3038//1921 3039//1924"
unlist(strsplit(gsub("//\\d{4}", "", x), " "))

[1] "3037" "3038" "3039"
par Michaël Delorme
12 Jan 2018, 10:49
Forum : Questions en cours
Sujet : sous tableau selectionnant une ligne plus la suivante selon condition sur la premiere
Réponses : 7
Vues : 752

Re: sous tableau selectionnant une ligne plus la suivante selon condition sur la premiere

Une autre proposition... library(tidyverse) df <- read_delim("a b c d 0 0 0 0 0 0 3 0 0 1 0 0 0 0 2 4 0 0 0 0", delim = " ") df %>% mutate(sel = b != 0 & c == 0 & d == 0, sel = sel | (lag(sel) & !is.na(lag(sel)))) %>% filter(sel) %>% select(-sel)

Aller à la recherche avancée