Myfanwy Johnston Myfanwy
Myfanwy
/ migrants.R
Created
November 2, 2015 18:29
— forked from johnburnmurdoch/migrants.R
This file contains 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(SmarterPoland) | |
| library(riverplot) | |
| library(RColorBrewer) | |
| library(graphics) | |
| library(reshape2) | |
| library(plyr) | |
| library(stringr) | |
| library(countrycode) | |
| # DOWNLOAD THE DATA |
Myfanwy
/ jekyll-google-calendar
Last active
October 6, 2016 17:59
— forked from iani/jekyll-google-calendar
Embed google calendar in a web page for rendering by Jekyll. Copied from: https://github.com/StevenBlack/qst-jekyll-bootstrap/blob/master/calendar.html see it in action here: http://www.queenssailing.ca/calendar/
This file contains 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
| --- | |
| layout: page | |
| title: Davis R-Users Group Calendar | |
| permalink: /calendar/ | |
| type: info | |
| header_text: Davis R-Users Group Calendar | |
| calendar: true | |
| --- | |
| <div class="span3"> | |
| <h3>Davis R-Users Group Events</h3> |
Myfanwy
/ one_fish_two_fish.r
Created
February 21, 2017 23:26
— forked from hrbrmstr/one_fish_two_fish.r
This file contains 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
| tt %>% | |
| mutate( | |
| laststation = as.character(laststation), | |
| TagID = as.character(TagID) | |
| ) %>% | |
| group_by(laststation) %>% | |
| ggplot(aes(TagID, kmday)) + | |
| geom_segment(aes(xend=TagID, yend=0)) + | |
| geom_point(shape="—", size=5) + | |
| facet_wrap(~laststation, nrow=1, scales="free_x") + |