Skip to content

Commit

Permalink
Merge pull request #134 from brews/master
Browse files Browse the repository at this point in the history
Fix raw_data scripts from `usethis` update upstream
  • Loading branch information
brews committed Jul 18, 2019
2 parents babb26f + f95d1c9 commit 35d6522
Show file tree
Hide file tree
Showing 5 changed files with 14 additions and 7 deletions.
3 changes: 2 additions & 1 deletion data-raw/lgr2.R
Original file line number Diff line number Diff line change
@@ -1,5 +1,6 @@
library(burnr)
library(usethis)

lgr2 <- read_fhx('data-raw/lgr2.fhx')

devtools::use_data(lgr2, overwrite = TRUE)
usethis::use_data(lgr2, overwrite = TRUE)
4 changes: 3 additions & 1 deletion data-raw/lgr2_meta.R
Original file line number Diff line number Diff line change
@@ -1,3 +1,5 @@
library(usethis)

lgr2_meta <- read.csv('data-raw/lgr2_meta.csv')

devtools::use_data(lgr2_meta, overwrite = TRUE)
usethis::use_data(lgr2_meta, overwrite = TRUE)
3 changes: 2 additions & 1 deletion data-raw/pgm.R
Original file line number Diff line number Diff line change
@@ -1,5 +1,6 @@
library(burnr)
library(usethis)

pgm <- read_fhx('data-raw/pgm.fhx')

devtools::use_data(pgm, overwrite = TRUE)
usethis::use_data(pgm, overwrite = TRUE)
4 changes: 3 additions & 1 deletion data-raw/pgm_meta.R
Original file line number Diff line number Diff line change
@@ -1,3 +1,5 @@
library(usethis)

pgm_meta <- read.csv('data-raw/pgm_meta.csv')

devtools::use_data(pgm_meta, overwrite = TRUE)
usethis::use_data(pgm_meta, overwrite = TRUE)
7 changes: 4 additions & 3 deletions data-raw/pgm_pdsi.R
Original file line number Diff line number Diff line change
@@ -1,6 +1,7 @@
# TXT file downloaded from http://iridl.ldeo.columbia.edu/SOURCES/.LDEO/.TRL/.NADA2004/pdsiatlashtml/pdsiwebdata/1050w_350n_133.txt
library(usethis)

# TXT file downloaded from http://iridl.ldeo.columbia.edu/SOURCES/.LDEO/.TRL/.NADA2004/pdsiatlashtml/pdsiwebdata/1050w_350n_133.txt
pdsi_raw <- read.table('data-raw/pgm_pdsi.txt', header = TRUE, row.names = 1)
pgm_pdsi <- subset(pdsi, select = "RECON")
pgm_pdsi <- subset(pdsi_raw, select = "RECON")

devtools::use_data(pgm_pdsi, overwrite = TRUE)
usethis::use_data(pgm_pdsi, overwrite = TRUE)

0 comments on commit 35d6522

Please sign in to comment.