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))
})

Try the scattermore package in your browser

Any scripts or data that you put into this service are public.

scattermore documentation built on July 9, 2023, 5:34 p.m.