Skip to content

Instantly share code, notes, and snippets.

@SimonGoring
Created August 29, 2016 23:45
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save SimonGoring/dbb4c8e0087882dc143baa89fa041d2b to your computer and use it in GitHub Desktop.
Save SimonGoring/dbb4c8e0087882dc143baa89fa041d2b to your computer and use it in GitHub Desktop.
Simple paleo-data visualization in R, linking the `rioja`, `neotoma` and `dplyr` packages.
library("neotoma", "rioja", "dplyr")
site <- get_site(sitename = "Carp Lake") %>% get_download %>% compile_taxa("P25")
par(mar = c(5, 7, 2, 4))
inkspot(counts(site[[1]]), site[[1]]$sample.meta$age, x.axis = "gradient", cex.axis = 0.6)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment