tests/testthat/test-histogram-lines-pixel-overlap.R

test_that("pixels do not overlap", {
  histogram <- scatter_lines_histogram(matrix(0.95*cbind(sin(pi*1:6/3), cos(pi*1:6/3), sin(pi*2:7/3), cos(pi*2:7/3)),ncol=4,byrow=F))

  expect_equal(1, max(histogram))
})
exaexa/scattermore documentation built on Jan. 26, 2024, 9:27 p.m.