Run tests with outputs for branch pd-line-styles-and-width

Author: pedrodz

run_tests_with_outputs.R

@@ -1,5 +1,5 @@
 library(testthat)
-devtools::install_github("ropensci/plotly", ref="marianne-geom-vline")
+devtools::install_github("ropensci/plotly", ref="pd-line-styles-and-width")
 library(plotly)
 
 setwd("tests")

tests/testthat/test-ggplot-abline-ggplot2.png

@@ -17,7 +17,7 @@ test_that("Second trace be the a-b line", {
   expect_true(L[[2]]$x[2] >= 3.5)
   expect_identical(L[[2]]$mode, "lines")
   expect_identical(L[[2]]$line$shape, "linear")
-  expect_equal(L[[2]]$line$width, 4)
+  expect_equal(L[[2]]$line$width, 8)
 
   save_outputs(gg, "abline")
 })

tests/testthat/test-ggplot-abline-plotly.png

@@ -24,7 +24,7 @@
             "mode": "markers", 
             "marker": {
                 "color": "rgb(0,0,0)", 
-                "size": 10, 
+                "size": 20, 
                 "symbol": "circle", 
                 "opacity": 1, 
                 "sizeref": 1, 
@@ -47,7 +47,7 @@
             "mode": "lines", 
             "line": {
                 "color": "rgb(255,0,0)", 
-                "width": 4, 
+                "width": 8, 
                 "dash": "solid", 
                 "shape": "linear"
             },