Lennart Klein kleinlennart

[![GitHub commits since tagged version](https://img.shields.io/github/commits-since/adityatelange/hugo-PaperMod/r readLines(".git/modules/themes/PaperMod/refs/heads/master")?style=flat&logo=github&label=Commits%20since%20last%20theme%20submodule%20pull)](https://github.com/adityatelange/hugo-PaperMod/compare/`r readLines(".git/modules/themes/PaperMod/refs/heads/master")`...master)

Lennart's Dotfiles

expand

stuff

	import json
	from pathlib import Path

	import pandas as pd
	from dotenv import load_dotenv
	from openai import OpenAI
	from tqdm import tqdm

	# .env
	# OPENAI_API_KEY=<API-Key>

	library(tidyverse)
	library(sf)

	# Data --------------------------------------------------------------------

	raw_survey <- read_csv(here::here("data", "input", "Survey", "Crisis+Data+Ecosystem+Survey_RAW.csv"))

	# Wrangle -----------------------------------------------------------------

	# remove the variable descriptions row, only useful for new colnames

	if (interactive()) {
	suppressMessages(require(usethis))
	}

	if (interactive()) {
	suppressMessages(require(devtools))
	}

	if (interactive()) {
	suppressMessages(require(cput))

	# Sort all columns alphabetically
	dat <- dat[,order(colnames(dat))]

	dat <- dat %>% select(sort(current_vars())) # Alternatively

	# Reorder each column alphabetically
	dat <- map_df(dat, function(x) {sort(x, na.last = TRUE)})

	snippet pak
	pak::pak("${1}")