ehbick01

## Load Packages & Define Theme
library(tidyverse)
library(doParallel)
library(parallel)
library(doSNOW)
library(foreach)
library(lubridate)

# Make function
getEm <- function(x) { 

ehbick01

## Load Packages
library(tidyverse)

## Set Theme
theme_set(
  theme_bw(base_family = 'Segoe UI', base_size = 12) +
    theme(
      plot.title = element_text(face = 'bold', hjust = 0),
      text = element_text(colour = '#445359'),
      panel.background = element_rect('#ffffff'),

ehbick01

## Load Packages
library(tidycensus)
library(purrr)

## Grab Data
# Set API key
census_api_key("your_api_key_here")

# Identify state FIPS codes
us <- unique(fips_codes$state)[1:51]

ehbick01

Keybase proof

I hereby claim:

• I am ehbick01 on github.
• I am robotirl (https://keybase.io/robotirl) on keybase.
• I have a public key ASAAPdgc1SVxxC0Lfkykpv8BF9ARtA1ZsNZyitYu7s0rkQo

To claim this, I am signing this object:

ehbick01

# -----------------------------------
# Pulling Historical Buoy Information
# October 2016
# -----------------------------------

## Load Packages
library(tidyverse)
library(xml2)
library(rvest)
library(RCurl)