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