fix test typo

cpsievert · cpsievert · commit c61675f8e492 · 2016-04-05T18:25:40.000+10:00
diff --git a/tests/testthat/test-plotly-subplot.R b/tests/testthat/test-plotly-subplot.R
@@ -84,7 +84,7 @@ s <- subplot(
 )
 
 test_that("Row/column height/width", {
-  l <- expect_traces(s, 3, "width-height")
+  l <- expect_traces(s, 4, "width-height")
   expect_equal(diff(l$layout$xaxis$domain), 0.8 - 0.005)
   expect_equal(diff(l$layout$xaxis2$domain), 0.2 - 0.005)
   expect_equal(diff(l$layout$yaxis$domain), 0.2 - 0.005)

Original file line number	Diff line number	Diff line change
`@@ -84,7 +84,7 @@ s <- subplot(`
`84`	`84`	`)`
`85`	`85`
`86`	`86`	`test_that("Row/column height/width", {`
`87`		`- l <- expect_traces(s, 3, "width-height")`
	`87`	`+ l <- expect_traces(s, 4, "width-height")`
`88`	`88`	`expect_equal(diff(l$layout$xaxis$domain), 0.8 - 0.005)`
`89`	`89`	`expect_equal(diff(l$layout$xaxis2$domain), 0.2 - 0.005)`
`90`	`90`	`expect_equal(diff(l$layout$yaxis$domain), 0.2 - 0.005)`