tests/testthat/test-TRI.R

test_that("TRI works", {
  ## not doing anything useful atm
  ## can this go into silicate?
  expect_silent(triq <- TRI.QUAD(QUAD(volcano)))
  plot3d(QUAD(volcano))
  mesh_plot(QUAD(volcano))
})

Try the anglr package in your browser

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

anglr documentation built on July 29, 2020, 9:06 a.m.