Skip to content
This repository has been archived by the owner. It is now read-only.

Commit

Permalink
fixed static scatterplot test to be R version independent
Browse files Browse the repository at this point in the history
HendrikSchultheis committed Sep 17, 2018
1 parent 6a0fc55 commit 2d98c7e
Showing 2 changed files with 67 additions and 40,078 deletions.
40,143 changes: 66 additions & 40,077 deletions tests/figs/create-static-plots/static-scatterplot.svg
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
2 changes: 1 addition & 1 deletion tests/testthat/test-static-plots.R
Original file line number Diff line number Diff line change
@@ -3,7 +3,7 @@ context("Create static plots")
test_that("scatterplot can be created", {
data <- data.table::data.table(mtcars[, c("mpg", "hp", "vs")], keep.rownames = "id")

out <- create_scatterplot(data, highlight.data = data[1:3,], highlight.color = "blue", color = c("red", "green"), categorized = TRUE)
out <- create_scatterplot(data, highlight.data = data[1:3,], highlight.color = "blue", color = c("red", "green"), categorized = TRUE, density = FALSE)
vdiffr::expect_doppelganger("static scatterplot", out$plot)
})

0 comments on commit 2d98c7e

Please sign in to comment.