This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
body { | |
background-color: #1d1d1d; | |
color: #e2e2e2; | |
font-family: -apple-system,BlinkMacSystemFont,"Segoe UI",Helvetica,Arial,sans-serif,"Apple Color Emoji","Segoe UI Emoji","Segoe UI Symbol"; | |
line-height: 1.5; | |
} | |
a { | |
color: #509eeb; | |
} |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
--- | |
title: "Decouple Code and Output in xaringan slides" | |
subtitle: "Demo Slides for <a href='https://garrickadenbuie.com/blog/2018/08/14/decouple-code-and-output-in-xaringan-slides/'>Related Blog Post</a>" | |
author: "Garrick Aden-Buie" | |
date: "`r Sys.Date()`" | |
output: | |
xaringan::moon_reader: | |
lib_dir: libs | |
nature: | |
ratio: 16:9 |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
library(tidyverse) | |
library(hrbrthemes) | |
# download https://github.com/rfordatascience/tidytuesday/blob/master/data/tidy_tuesday_week2.xlsx | |
football <- read_xlsx("data/tidy_tuesday_week2.xlsx") | |
# get the top 16 paid players in each position for each year | |
to_plot <- football %>% | |
mutate(Team = 1:nrow(.)) %>% | |
gather(position, salary, -c(year, Team)) %>% |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
library(tidycensus) | |
library(tidyverse) | |
library(extrafont) | |
city16 <- get_acs(geography = "place", | |
variables = "B01003_001", | |
survey = "acs1") %>% | |
filter(estimate > 500000) %>% | |
rename(estimate16 = estimate) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
## | |
## Slightly nicer .bashrc | |
## Makes pretty colors and stuff | |
## | |
## Set $PATH, which tells the computer where to search for commands | |
export PATH="$PATH:/usr/sbin:/sbin:/bin:/usr/bin:/etc:/usr/ucb:/usr/local/bin:/usr/local/local_dfs/bin:/usr/bin/X11:/usr/local/sas" | |
## Where to search for manual pages | |
export MANPATH="/usr/share/man:/usr/local/man:/usr/local/local_dfs/man" |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# Path to your oh-my-zsh configuration. | |
export ZSH=$HOME/.oh-my-zsh | |
# Set name of the theme to load. | |
# Look in ~/.oh-my-zsh/themes/ | |
# Optionally, if you set this to "random", it'll load a random theme each | |
# time that oh-my-zsh is loaded. | |
#export ZSH_THEME="robbyrussell" | |
export ZSH_THEME="zanshin" |
NewerOlder