Skip to content

Instantly share code, notes, and snippets.

View RCura's full-sized avatar

Robin Cura RCura

View GitHub Profile
library(readr)
library(dplyr)
raw_df <- read_delim("5262_FH CAPE TOWN_3.TXT",
delim = ",",
col_names = FALSE)
code3 <- raw_df %>%
filter(X1 == 3) %>%
mutate(ID = 1:nrow(.)) %>%
<!-- $theme: gaia -->
<!-- template: gaia -->
---
# Histoire de la Cartographie
## ==Nouvelles sources et==<br/> représentations graphiques associées
### Robin Cura
#### Doctorant, UMR Géographie-cités
---
@RCura
RCura / DMBS_benchmarks.png
Last active February 3, 2018 06:24
Comparing the performances of various DBMS using dplyr for large-ish data
DMBS_benchmarks.png
#!/bin/bash
cd /home/robin/gama17git/headless
experimentPath="/home/robin/sensitivity/simFEODAL_analyse_sensibilite_"
outputPath="/home/robin/myOutputs/sim"
xml=".xml"
# Cluster got 24 cores
# We launch each simulation on 2 cores, so, 8 simulations
# Each with 4Go of RAM (64 Go Total)
# Server
@RCura
RCura / analyse_SIRENE.R
Last active April 1, 2017 13:03
Exemple simple d'analyse de la base SIRENE
library(tidyverse) # tidyverse charge les packages les plus utiles issus de la logique "tidy",
# c'est-à-dire : dplyr, tidyr, readr et ggplot2 (entre autre)
# Si tidyverse n'est pas disponible, décommenter les ligne suivante
# library(dplyr)
# library(tidyr)
# library(readr)
# library(ggplot2)
@RCura
RCura / R_microbenchmarks.csv
Last active February 6, 2017 16:46
Benchmarking leaflet.extras::addHeatmap vs leaflet.extras::addWebGLHeatmap
expr time
heat_1M 91798898.0
heat_10k 2434459.0
heat_250k 24478987.0
webgl_2M 352987427.0
webgl_10k 2810198.0
heat_500k 49994687.0
webgl_2M 281330926.0
webgl_500k 46751394.0
heat_10k 2875177.0
---
title: "WebGLHeatmap-big"
output:
html_notebook: default
---
## Data preparation
```{r data loading}
library(tibble)
---
title: "WebGLHeatmap-small"
output:
html_notebook: default
---
## Data preparation
```{r data loading}
library(tibble)
---
title: "WebGLHeatmap-small"
output:
html_notebook: default
---
## Data preparation
```{r data loading}
library(tibble)
---
title: "Leaflet.heat"
output: html_notebook
---
## Data preparation
```{r data loading}
library(tibble)
library(dplyr)