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
74
Programmatic access for Altmetrics
myrmecocystus
1
72
Contribution of traits and phylogenetic history to plant-pollinator network
myrmecocystus
0
100
Other Decks in Science
See All in Science
勉強会資料 / “Asymptotic Statistics” Section 2.1
asymptotic_minato
0
220
FIBA W杯の日本代表って組み合わせ次第で2次ラウンド行けたんじゃね?をデータで検証
saltcooky12
0
200
OptimizationNight~機械学習と数理最適化の融合~
hidenari
0
290
Machine Learning for Materials (Lecture 3)
aronwalsh
0
820
Machine Learning for Materials (Lecture 9)
aronwalsh
0
120
AI Alignment: A Comprehensive Survey
s_ota
0
180
論文輪読会 第16回 "NeRF:Representing Scenes as Neural"
academix
0
450
スポーツメトリクス設計に対比較法を使いまくる / Sports metrics design using pairwise comparison method (spoana#14)
konakalab
1
690
「みんなの自然災害伝承碑」ワークショップ 2023|日本地図学会
fullfull
0
210
AI(人工知能)の過去・現在・未来 —AIは人間を超えるのか—
tagtag
1
190
『データ可視化学入門』を PythonからRに翻訳した話
bob3bob3
1
360
Endocannabinology 101
drbonci
PRO
0
250
Featured
See All Featured
Designing with Data
zakiwarfel
95
4.8k
The Art of Programming - Codeland 2020
erikaheidi
41
12k
Git: the NoSQL Database
bkeepers
PRO
422
63k
Cheating the UX When There Is Nothing More to Optimize - PixelPioneers
stephaniewalter
273
13k
Fireside Chat
paigeccino
20
2.6k
Agile that works and the tools we love
rasmusluckow
324
20k
The Brand Is Dead. Long Live the Brand.
mthomps
48
28k
Fashionably flexible responsive web design (full day workshop)
malarkey
397
65k
Thoughts on Productivity
jonyablonski
57
3.8k
YesSQL, Process and Tooling at Scale
rocio
163
13k
Designing on Purpose - Digital PM Summit 2013
jponch
110
6.4k
Making the Leap to Tech Lead
cromwellryan
123
8.5k
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