Release v1.1.1

Merge pull request #9 from miraisolutions/release/v1.1.1

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: vbzdelays
 Title: VBZ Delay Analysis
-Version: 1.1.0
+Version: 1.1.1
 Authors@R: 
     person(given = "Mirai",
            family = "Labs",

NEWS.md

@@ -1,3 +1,7 @@
+# vbzdelays 1.1.1
+
+* Rendering of the full website is now tested on Travis upon PR (#7).
+
 # vbzdelays 1.1.0
 
 * `plot_delays_by_weekday_hour()` extended with the percentage of delayed connections (#1).

R/plot.R

@@ -23,7 +23,6 @@ barplot_by_weekday_hour <- function(delays) {
 #' plot_delays_by_weekday_hour(data)
 #'
 #' @import dplyr
-#' @import ggplot2
 #' @export
 plot_delays_by_weekday_hour <- function(data) {
   data %>%

README.md

@@ -25,20 +25,20 @@ data <- vbzdelays::get_line_data(line = 11)
 
 Plot delays by hour per weekday
 
-```r
-plot_delays_by_weekday_hour(data)
+``` r
+vbzdelays::plot_delays_by_weekday_hour(data)
 ```
 
 Produce delay analysis report by line
 
-```r
-report <- render_line_report(line = 11, tempdir())
+``` r
+report <- vbzdelays::render_line_report(line = 11, tempdir())
 browseURL(report)
 ```
 
 Create a website as collection of reports for all lines
 
-```r
+``` r
 website <- vbzdelays::render_site(output_dir = tempfile("_site"))
 browseURL(website)
 ```

tests/testthat/test-render_site.R

@@ -0,0 +1,7 @@
+test_that("the whole website can be rendered", {
+  # skip unless part of a pull requests run on Travis
+  skip_if(Sys.getenv("TRAVIS_PULL_REQUEST", "false") == "false")
+  index <- render_site(output_dir = tempfile())
+  expect_true(file.exists(index))
+  expect_equal(basename(index), "index.html")
+})