tests/testthat/test-hilo.R

context("test-hilo.R")

test_that("Extracting intervals from a distribution", {
  skip_if_not_installed("fable")
  
  fc_sum <- fbl %>% 
    mutate(`80%` = hilo(value, 80))
  
  expect_s3_class(fc_sum$`80%`, "hilo")
})

Try the fabletools package in your browser

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

fabletools documentation built on Oct. 12, 2023, 1:07 a.m.