tests/testthat/test_e_qr_event.R

test_that("qr_event()", {
  expect_s3_class(
    qr_event(start = Sys.time(), end = Sys.time(), title = "my event"),
    c("qr_code", "qr_event")
  )
})

Try the qrcode package in your browser

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

qrcode documentation built on Nov. 11, 2023, 5:07 p.m.