diff --git a/README.md b/README.md index db49861..901e8d1 100644 --- a/README.md +++ b/README.md @@ -1,7 +1,7 @@ ### :mask: cdcfluview - Retrieve U.S. Flu Season Data from the CDC FluView Portal -[![CRAN\_Status\_Badge](http://www.r-pkg.org/badges/version/cdcfluview)](https://cran.r-project.org/package=cdcfluview) [![Travis-CI Build Status](https://travis-ci.org/hrbrmstr/cdcfluview.svg?branch=master)](https://travis-ci.org/hrbrmstr/cdcfluview) +[![CRAN\_Status\_Badge](http://www.r-pkg.org/badges/version/cdcfluview)](https://cran.r-project.org/package=cdcfluview) [![Travis-CI Build Status](https://travis-ci.org/hrbrmstr/cdcfluview.svg?branch=master)](https://travis-ci.org/hrbrmstr/cdcfluview) [![Coverage Status](https://img.shields.io/codecov/c/github/hrbrmstr/cdcfluview/master.svg)](https://codecov.io/github/hrbrmstr/cdcfluview?branch=master) **NOTE** If there's a particular data set from that you want and that isn't in the package, please file it as an issue and be as specific as you can (screen shot if possible). @@ -49,7 +49,7 @@ library(statebins) # current verison packageVersion("cdcfluview") -#> [1] '0.5.1' +#> [1] '0.5.2' flu <- get_flu_data("hhs", sub_region=1:10, "ilinet", years=2014) glimpse(flu) @@ -75,14 +75,14 @@ state_flu <- get_state_data(years=2015) glimpse(state_flu) #> Observations: 2,807 #> Variables: 8 -#> $ statename "Alabama", "Alaska", "Arizona", "Arkansas", "California", "Colorado", "Connecticut", "... -#> $ url "http://adph.org/influenza/", "http://dhss.alaska.gov/dph/Epi/id/Pages/influenza/influ... -#> $ website "Influenza Surveillance", "Influenza Surveillance Report", "Influenza & RSV Surveillan... -#> $ activity_level 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,... -#> $ activity_level_label "Minimal", "Minimal", "Minimal", "Minimal", "Minimal", "Minimal", "Minimal", "Minimal"... -#> $ weekend "Oct-10-2015", "Oct-10-2015", "Oct-10-2015", "Oct-10-2015", "Oct-10-2015", "Oct-10-201... +#> $ statename "Virgin Islands", "District of Columbia", "Virgin Islands", "District of Columbia", "V... +#> $ url "http://doh.vi.gov/", "http://doh.dc.gov/page/influenza-season", "http://doh.vi.gov/",... +#> $ website "Influenza", "Influenza Information", "Influenza", "Influenza Information", "Influenza... +#> $ activity_level 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,... +#> $ activity_level_label "Insufficient Data", "Insufficient Data", "Insufficient Data", "Insufficient Data", "I... +#> $ weekend "Oct-10-2015", "Oct-17-2015", "Oct-17-2015", "Oct-24-2015", "Oct-24-2015", "Oct-31-201... #> $ season "2015-16", "2015-16", "2015-16", "2015-16", "2015-16", "2015-16", "2015-16", "2015-16"... -#> $ weeknumber 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40... +#> $ weeknumber 40, 41, 41, 42, 42, 43, 43, 44, 44, 45, 45, 46, 46, 47, 47, 48, 48, 49, 49, 50, 50, 51... gg <- ggplot(flu, aes(x=WEEK, y=`% WEIGHTED ILI`, group=REGION)) gg <- gg + geom_line() @@ -153,7 +153,7 @@ library(cdcfluview) library(testthat) date() -#> [1] "Mon Dec 5 14:45:12 2016" +#> [1] "Tue Mar 14 09:59:29 2017" test_dir("tests/") #> testthat results ========================================================================================================