Upgrade to Pro
— share decks privately, control downloads, hide ads and more …
Speaker Deck
Features
Speaker Deck
PRO
Sign in
Sign up for free
Search
Search
R Based tools for open and collaborative science
Search
Scott Chamberlain
July 26, 2013
Science
0
1.4k
R Based tools for open and collaborative science
Ignite talk at ESA on R-based tools for open and collaborative science
Scott Chamberlain
July 26, 2013
Tweet
Share
More Decks by Scott Chamberlain
See All by Scott Chamberlain
Contribution of traits, phenology, & phylogenetic history to plant-pollinator network structure
myrmecocystus
0
83
Programmatic access for Altmetrics
myrmecocystus
1
110
Contribution of traits and phylogenetic history to plant-pollinator network
myrmecocystus
0
110
Other Decks in Science
See All in Science
研究って何だっけ / What is Research?
ks91
PRO
1
130
mOrganic™ Holdings, LLC.
hyperlocalnetwork
0
120
CV_5_3dVision
hachama
0
150
知能とはなにかーヒトとAIのあいだー
tagtag
0
100
学術講演会中央大学学員会府中支部
tagtag
0
310
データベース06: SQL (3/3) 副問い合わせ
trycycle
PRO
1
640
なぜ21は素因数分解されないのか? - Shorのアルゴリズムの現在と壁
daimurat
0
110
生成AIと学ぶPythonデータ分析再入門-Pythonによるクラスタリング・可視化をサクサク実施-
datascientistsociety
PRO
4
1.8k
データベース05: SQL(2/3) 結合質問
trycycle
PRO
0
820
2025-06-11-ai_belgium
sofievl
1
170
深層学習を用いた根菜類の個数カウントによる収量推定法の開発
kentaitakura
0
190
Hakonwa-Quaternion
hiranabe
1
140
Featured
See All Featured
I Don’t Have Time: Getting Over the Fear to Launch Your Podcast
jcasabona
34
2.5k
How to train your dragon (web standard)
notwaldorf
97
6.3k
For a Future-Friendly Web
brad_frost
180
10k
GraphQLとの向き合い方2022年版
quramy
49
14k
The Straight Up "How To Draw Better" Workshop
denniskardys
238
140k
Improving Core Web Vitals using Speculation Rules API
sergeychernyshev
21
1.2k
Imperfection Machines: The Place of Print at Facebook
scottboms
269
13k
What's in a price? How to price your products and services
michaelherold
246
12k
Become a Pro
speakerdeck
PRO
29
5.6k
Why You Should Never Use an ORM
jnunemaker
PRO
59
9.6k
Connecting the Dots Between Site Speed, User Experience & Your Business [WebExpo 2025]
tammyeverts
10
600
ReactJS: Keep Simple. Everything can be a component!
pedronauck
667
120k
Transcript
R-based tools for open and collaborative science @recology_ Scott Chamberlain
Science needs to be more open
http://everyoneknowsbest.files.wordpress.com/2008/08/bodysculpture.jpg We build on the knowledge of others http://everyoneknowsbest.files.wordpress.com/2008/08/bodysculpture.jpg
Less mistakes More things can happen b/c data is open
http://everyoneknowsbest.files.wordpress.com/2008/08/bodysculpture.jpg The public paid for it!
http://www.fotopedia.com/items/flickr-4796633039 But we need tools to do it!!!!!
What kinds of tools? Not these
These!!!!!!
• Collect data • Manipulate data • Visualize • Analyze
• Write What does an ecologist do?
R is a good solution
• R is Open source = Free + Rapid change
• R = entire workflow in 1 place • R = reproducible science Why?
Get some data from the web library(RCurl); library(RJSONIO) dat <-
fromJSON(getURL("https://api.github.com/users/hadley/repos")) Manipulate the data library(plyr); library(reshape2) dat_melt <- melt(ldply(dat, function(x) data.frame(x[names(x) %in% c("name","watchers_count","forks")]))) Run some statistical model lm(value ~ variable, data = dat_melt) Visualize results library(ggplot2) ggplot(dat_melt, aes(name, value, colour = variable)) + geom_point() + coord_flip() Write the paper # Introduction...
Data increasingly on the web
The toolbelt
Literature library(rplos) plot_throughtime('phylogeny', 300) + geom_line(size=2)
Taxonomy library(taxize) classification("Abies procera", db = "itis") rankName taxonName
tsn Kingdom Plantae 202422 Subkingdom Viridaeplantae 846492 Infrakingdom Streptophyta 846494 Division Tracheophyta 846496 Subdivision Spermatophytina 846504 Infradivision Gymnospermae 846506 Class Pinopsida 500009 Order Pinales 500028 Family Pinaceae 18030 Genus Abies 18031 Species Abies procera 181835
Species occurrences from GBIF library(rgbif) splist <- c('Accipiter erythronemius', 'Junco
hyemalis', 'Aix sponsa', 'Podiceps cristatus') out <- occurrencelist_many(splist) gbifmap_list(out)
Occurrence from USGS’s BISON service library(rbison) out <- bison(species="Helianthus annuus",
count=500) bisonmap(input=out, tomap="county")
Climate data from the World Bank library(rWBclimate) country.list <- c("USA",
"MEX") country.dat <- get_historical_temp(country.list, "year") ggplot(country.dat, aes(x = year, y = data, group = locator)) + geom_point() + geom_path() + labs(y="Average annual temperature of Canada", x="Year") + theme_bw() + stat_smooth(se = F, colour = "black") + facet_wrap(~locator, scale = "free")
Take action! FontAwesome http://fortawesome.github.io/Font-Awesome/ fontawesome 2 png https://github.com/odyniec/font-awesome-to-png Presentation available
here: http://bit.ly/16tuVbu