Skip to content

Instantly share code, notes, and snippets.

@yeedle
yeedle / hourly-weather.R
Last active February 5, 2022 04:14
Temperature of every hour in NY since 1973
library(tidyverse)
library(R.utils)
library(glue)
library(magrittr)
library(weathermetrics)
library(padr)
library(ggExtra)
library(lubridate)
library(scales)
library(hrbrthemes)
041adf4cc10534b649bfaeed80934e4369203cabff2756e57453bb99472c7897beb04d71b16f83217631ea0628d114d4fe78b9e045c885c62205aca860db0c0775;realazthat
@yeedle
yeedle / tiobe.R
Last active January 12, 2018 15:47 — forked from hadley/tiobe.R
library(rvest)
library(stringr)
library(tidyverse)
page <- read_html("https://www.tiobe.com/tiobe-index/r/")
script <- page %>%
html_node("body > section > section > section > article > script") %>%
html_text()

Keybase proof

I hereby claim:

  • I am yeedle on github.
  • I am yeedle (https://keybase.io/yeedle) on keybase.
  • I have a public key ASAAPQHuf4Regji3HsrhtW0tKbOSvMjHlV1lSpxv6zbvPAo

To claim this, I am signing this object:

@yeedle
yeedle / hourly-weather-london.R
Created October 24, 2017 13:50
Temperature of every hour in London since 1973
library(tidyverse)
library(R.utils)
library(glue)
library(padr)
library(ggExtra)
library(lubridate)
library(scales)
library(hrbrthemes)
#london
@yeedle
yeedle / The Technical Interview Cheat Sheet.md
Created November 13, 2016 04:28 — forked from tsiege/The Technical Interview Cheat Sheet.md
This is my technical interview cheat sheet. Feel free to fork it or do whatever you want with it. PLEASE let me know if there are any errors or if anything crucial is missing. I will add more links soon.

Studying for a Tech Interview Sucks, so Here's a Cheat Sheet to Help

This list is meant to be a both a quick guide and reference for further research into these topics. It's basically a summary of that comp sci course you never took or forgot about, so there's no way it can cover everything in depth. It also will be available as a gist on Github for everyone to edit and add to.

Data Structure Basics

###Array ####Definition:

  • Stores data elements based on an sequential, most commonly 0 based, index.
  • Based on tuples from set theory.
@yeedle
yeedle / rasmussen-approval-index.r
Last active August 2, 2017 14:30
comparing the rasmussen approval index of obama and trump
library(tidyverse)
library(rvest)
library(lubridate)
library(ggalt)
obama_url <- "http://www.rasmussenreports.com/public_content/politics/obama_administration/obama_approval_index_history"
trump_url <- "http://www.rasmussenreports.com/public_content/politics/trump_administration/trump_approval_index_history"
index <- list(obama = obama_url, trump = trump_url) %>%
map_df(~ read_html(.x) %>%
library(tidyverse)
#> + ggplot2 2.2.1.9000        Date: 2017-05-20
#> + tibble  1.3.1                R: 3.4.0
#> + tidyr   0.6.3               OS: elementary OS 0.4.1 Loki
#> + readr   1.1.1              GUI: X11
#> + purrr   0.2.2.2         Locale: en_US.UTF-8
#> + dplyr   0.5.0.9005          TZ: posixrules
#> + stringr 1.2.0           
#> + forcats 0.2.0
@yeedle
yeedle / add_images_as_xlabels.R
Created March 6, 2017 02:00 — forked from jonocarroll/add_images_as_xlabels.R
Replace categorical x-axis labels with images
#' Replace categorical x-axis labels with images
#'
#' Pipe a ggplot2 graph (with categorical x-axis) into this function with the argument of a list of
#' pictures (e.g. loaded via readImage) and it builds a new grob with the x-axis categories
#' now labelled by the images. Solves a problem that you perhaps shouldn't have.
#'
#' @author J. Carroll, \email{jono@@jcarroll.com.au}
#' @references \url{http://stackoverflow.com/questions/29939447/icons-as-x-axis-labels-in-r-ggplot2}
#'
#' @param g ggplot graph with categorical x axis
@yeedle
yeedle / download_windows_binaries.R
Created December 25, 2016 20:33
How to download an R package and all its dependecies for windows
getPackages <- function(packs){
packages <- unlist(
tools::package_dependencies(packs, available.packages(),
which=c("Depends", "Imports"), recursive=TRUE)
)
packages <- union(packs, packages)
packages
}
packages <- getPackages(c("ggplot2", "MASS"))