I hereby claim:
- I am hrbrmstr on github.
- I am hrbrmstr (https://keybase.io/hrbrmstr) on keybase.
- I have a public key whose fingerprint is 8BEC EF50 9D70 C613 A59C 5AD7 CBB9 4084 59AD 8A98
To claim this, I am signing this object:
I hereby claim:
To claim this, I am signing this object:
| theme_map <- function(base_size=9, base_family="") { | |
| require(grid) | |
| theme_bw(base_size=base_size, base_family=base_family) %+replace% | |
| theme( | |
| axis.line=element_blank(), | |
| axis.text=element_blank(), | |
| axis.ticks=element_blank(), | |
| axis.title=element_blank(), | |
| panel.background=element_blank(), | |
| panel.border=element_blank(), |
This is a collection of information on PostgreSQL and PostGIS for what I tend to use most often.
| @binkmail.com | |
| @bobmail.info | |
| @chammy.info | |
| @devnullmail.com | |
| @letthemeatspam.com | |
| @mailinater.com | |
| @mailinator.net | |
| @mailinator2.com | |
| @notmailinator.com | |
| @reallymymail.com |
| # The difference between the `sep` and `collapse` arguments | |
| # in paste can be thought of like this: | |
| # | |
| # paste can accept multiple *vectors* as input, and will | |
| # concatenate the ith entries of each vector pairwise | |
| # (or tuplewise), if it can. | |
| # | |
| # When you pass paste multiple vectors, sep defines what | |
| # separates the entries in those tuple-wise concatenations. | |
| # |
| library(curl) | |
| d3 <- "https://github.com/mbostock/d3/archive/v3.0.6.zip" | |
| tmp <- tempfile() | |
| curl::curl_download(d3, tmp, mode = "wb") | |
| unzip(tmp) | |
| unlink(tmp) | |
| library(gistr) | |
| gistr::gist_create(files = "d3-3.0.6/d3.js") |
| print("UPDATE AUG 2023: this script is beyond old and broken") | |
| print("You may find interesting and more up to date resources in the comments of the gist") | |
| exit() | |
| from slacker import Slacker | |
| import json | |
| import argparse | |
| import os | |
| # This script finds all channels, private channels and direct messages |
My objective is to have some production files ignored on specific branches. Git doesn't allow to do it.
My solution is to make a general .gitignore file and add .gitignore.branch_name files for the branches I want to add specific file exclusion.
I'll use post-checkout hook to copy those .gitignore.branch_name in place of .git/info/exclude each time I go to the branch with git checkout branch_name.
| xy <- data.frame(x = 1:3, y = letters[1:3], z = LETTERS[1:3]) | |
| chg <- data.frame(old = colnames(xy), new = toupper(colnames(xy))) | |
| library(plyr) | |
| colnames(xy) <- mapvalues(x = colnames(xy), | |
| from = as.character(chg$old), | |
| to = as.character(chg$new)) |