Skip to content

Instantly share code, notes, and snippets.

View jvieroe's full-sized avatar

Jeppe Vierø jvieroe

View GitHub Profile
@marcosci
marcosci / olympus_hex.R
Created November 5, 2021 12:32
Hexagonal Rayshading
library(LaCroixColoR)
library(sf)
library(fasterize)
library(rayshader)
library(raster)
library(exactextractr)
library(rayrender)
# load raster into R
elevation <- raster("Olympus_Mons_ortho-image.tif")
require(rvest)
require(purrr)
require(textclean)
require(tidyverse)
require(hansard)
require(quanteda)
require(quanteda.textmodels)
require(quanteda.textplots)
pg <- read_html("https://hansard.parliament.uk/commons/2021-08-18/debates/A86142BD-A204-4BC8-BBC0-ACA7BAD7E9F0/Afghanistan")
@sebastianbarfort
sebastianbarfort / KV2013
Last active June 10, 2024 11:57
Download kommunalvalgsdata fra kmdvalg.dk.
library(XML)
# main page
url <- "http://kmdvalg.dk/main"
# read links
url.data <- readLines(url)
doc <- htmlTreeParse(url.data, useInternalNodes = TRUE)
#grab urls
urls <- unlist(xpathApply(doc, "//div[@class='LetterGroup']//a[@href]",