67 résultats trouvés

Aller à la recherche avancée

par Michaël Delorme
10 Juil 2023, 05:37
Forum : Questions en cours
Sujet : Clusters à partir de données GPS
Réponses : 6
Vues : 1037

Re: Clusters à partir de données GPS

Merci pour ce retour. Content que ça ait pu aider...
Cordialement
par Michaël Delorme
29 Juin 2023, 08:47
Forum : Questions en cours
Sujet : Clusters à partir de données GPS
Réponses : 6
Vues : 1037

Re: Clusters à partir de données GPS

Les gens qui posent une question et ne reviennent jamais, qui sont-ils ? Quels sont leurs réseaux ?
:-/
par Michaël Delorme
23 Juin 2023, 12:22
Forum : Questions en cours
Sujet : Clusters à partir de données GPS
Réponses : 6
Vues : 1037

Re: Clusters à partir de données GPS

Avec {adehabitatHR} pour prendre par exemple 80 % des observations "centrales" library(adehabitatHR) library(dplyr) library(sf) set.seed(1234) df <- data.frame(lon = rnorm(121, 4, 0.0001), lat = rnorm(121, 45, 0.0001)) %>% mutate(id = row_number(), animal_id = "tourterelle_1") df...
par Michaël Delorme
23 Juin 2023, 09:13
Forum : Questions en cours
Sujet : Clusters à partir de données GPS
Réponses : 6
Vues : 1037

Re: Clusters à partir de données GPS

Vu tes prérequis, je dirais aussi DBSCAN. À noter aussi cependant pour ce genre d'étude le package {adehabitatHR} qui peut offrir des outils intéressants. Pour DBSCAN, il faut au préalable convertir les coordonnées dans une projection plane métrique (ex de WGS84 vers Lambert93 si tu es en France). l...
par Michaël Delorme
20 Juin 2023, 10:02
Forum : Questions en cours
Sujet : Quarto présentation
Réponses : 3
Vues : 1022

Re: Quarto présentation

Manifestement le PDF n'est pas généré ; il y a un problème d'installation de xelatex, indépendant de la question posée je pense...
par Michaël Delorme
19 Juin 2023, 15:18
Forum : Questions en cours
Sujet : Quarto présentation
Réponses : 3
Vues : 1022

Re: Quarto présentation

test.qmd : --- title: "Test" format: html: default pdf: default --- ## Quarto ```{r} 2 * 2 ``` ```{r} #| echo: false #| results: asis if (knitr::is_html_output()) cat("[Télécharger le PDF](test.pdf)") ``` puis après installation de {quarto} install.packages("quarto") qu...
par Michaël Delorme
08 Juin 2022, 12:15
Forum : Questions en cours
Sujet : Installation du package "plot3D" (R4.2)
Réponses : 2
Vues : 551

Re: Installation du package "plot3D" (R4.2)

Tu sembles juste avoir eu un problème d'accès Internet à ce moment (Couldn't resolve host name). Ré-essaye...
par Michaël Delorme
21 Sep 2021, 10:20
Forum : Questions en cours
Sujet : KnitR pour Rmarkdown automatisé à partir d'un fichier .bat
Réponses : 2
Vues : 1750

Re: KnitR pour Rmarkdown automatisé à partir d'un fichier .bat

Si tu le fais depuis RStudio et que ça marche je crois que c'est parce que RStudio utilise sa propre version de Pandoc. Dans un batch je fais un : SET PATH=%PATH%;chemin\vers\pandoc\ pour que Pandoc soit trouvé avant de lancer R. NB : la bonne pratique dans ce cas est d'utiliser Rscript.exe plutôt q...
par Michaël Delorme
19 Aoû 2021, 15:01
Forum : Questions en cours
Sujet : valeurs numériques négatives: arguments d'importation format txt
Réponses : 7
Vues : 1709

Re: valeurs numériques négatives: arguments d'importation format txt

Le signe moins est-il un « vrai » signe moins ? library(readr)> parse_number("-1.2")[1] -1.2> parse_number("–1.2")[1] 1.2> parse_number("—1.2")[1] 1.2 Les tirets demi-cadratin (Unicode U+2013) ou cadratin (Unicode U+2014) peuvent poser des problèmes...
par Michaël Delorme
08 Juil 2021, 14:22
Forum : Questions en cours
Sujet : Addition colonne
Réponses : 4
Vues : 850

Re: Addition colonne

Il y a sûrement plus court avec R base et sans passer par les pivots, mais bon... library(tidyverse) df <- tribble(~pays, ~`2010`, ~`2011`, ~`2012`, "FRA", 10, 10, 10, "CHE", 10, 20, 30, "ITA", 100, 0, NA) df %>% pivot_longer(-1, names_to = "annee", values_to ...
par Michaël Delorme
07 Juil 2021, 08:17
Forum : Questions en cours
Sujet : Compter le nombre de cas valide par variable
Réponses : 4
Vues : 1071

Re: Compter le nombre de cas valide par variable

Ou avec une autre méthode :

Code : Tout sélectionner

library(dplyr)
df <- data.frame(
  c0 = c(1,2,3,4),
  c1 = c(1,3,1,4),
  c2 = c(3,NA,NA,NA),
  c3 = c(1,2,12,0))

df %>%
  summarise(across(everything(), ~ sum(!is.na(.))))

df %>%
  summarise(across(everything(), n_distinct))
par Michaël Delorme
02 Juil 2021, 09:23
Forum : Questions en cours
Sujet : Incrémenter une variable sans tenir compte des valeurs NA
Réponses : 3
Vues : 723

Re: Incrémenter une variable sans tenir compte des valeurs NA

Code : Tout sélectionner

data %>%
  mutate(c6 = c5 + cumsum(!is.na(c5)) - 1)
par Michaël Delorme
14 Avr 2021, 09:29
Forum : Questions en cours
Sujet : Ajout d'occurrences dans un data frame
Réponses : 2
Vues : 478

Re: Ajout d'occurrences dans un data frame

Générer une série d'heures, joindre avec les données et compléter : library(tidyr) library(dplyr) library(lubridate) data.frame(Heure = format(seq(ymd_hm("2021-01-01 00:00"), ymd_hm("2021-01-01 23:59"), by = "1 min"), "%H:%M")) %>% left_join(d, by = "Heur...

Aller à la recherche avancée