Skip to content

Instantly share code, notes, and snippets.

View jimhester's full-sized avatar

Jim Hester jimhester

View GitHub Profile
@gaborcsardi
gaborcsardi / cran-over-time.R
Last active July 18, 2020 19:21
Size of the CRAN R package repository over time
library(jsonlite)
## Download
pkgs <- fromJSON("http://crandb.r-pkg.org/-/events")
## Filter
na_pkgs <- unique(pkgs$name[ is.na(pkgs$date) ])
events <- pkgs[ ! pkgs$name %in% na_pkgs, c("date", "name", "event")]

VIM FOR ADULTS

CHAPTER ONE: STOP TYPING

intro/stuff you should already know

what is vim?

  • based on very old editor (vi) designed in the days when connections were slow
  • installed on almost every *nix system, incl. os x
  • organic growth since to include hundreds of modern features
@ericclemmons
ericclemmons / example.md
Last active October 13, 2025 15:16
HTML5 <details> in GitHub

Using <details> in GitHub

Suppose you're opening an issue and there's a lot noisey logs that may be useful.

Rather than wrecking readability, wrap it in a <details> tag!

<details>
 Summary Goes Here
path <- "~/Documents/ingest/readxl/inst/extdata/datasets.xlsx"
zip_file <- function(path) {
stopifnot(file.exists(path))
path <- normalizePath(path)
contents <- utils::unzip(path, list = TRUE)
names(contents) <- c("path", "size", "date")
contents <- contents[contents$size > 0, , drop = FALSE]
@egmontkob
egmontkob / Hyperlinks_in_Terminal_Emulators.md
Last active October 17, 2025 13:03
Hyperlinks in Terminal Emulators
@jmcphers
jmcphers / exceptionally-good-presentations.txt
Last active June 15, 2018 16:36
How to Give an Exceptionally Good Presentation
"HOW TO GIVE AN EXCEPTIONALLY GOOD PRESENTATION"
CHARACTERS
Joe Cheng.............Moderator
Jennifer Bryan........As Herself
Hadley Wickham........As Himself
Aron Atkins...........Audience
Derrick Kearney.......Audience
@ledell
ledell / meetupr_rladies_budapest_random.R
Last active July 31, 2018 11:36
Randomly select an attendee of a meetup to win a prize! (R-Ladies Budapest Example)
# library(devtools)
# devtools::install_github("rladies/meetupr")
library(meetupr)
# Log in to meetup.com, your key is here: https://secure.meetup.com/meetup_api/key/
api_key <- "YOUR_API_KEY_HERE"
# `urlname` is a human-readable unique id for a meetup, e.g. https://www.meetup.com/R-Ladies-Budapest/
urlname <- "R-Ladies-Budapest"