tests/testthat/test-as_tibble.R

test_that("Turn magpie into tibble", {
  tib <- tibble::as_tibble(new.magpie("AFR.1", "2000", "test", 123))
  expect_s3_class(tib, "tbl_df")

  tib <- tibble::as_tibble(maxample("pop"))
  expect_s3_class(tib, "tbl_df")
})

Try the magclass package in your browser

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

magclass documentation built on July 9, 2023, 7:03 p.m.