tests/testthat/test-flget_geoparameters.R

# Tests for flget_geoparameters

test_that("flget_geoparameters works", {
  dat_no_TS <- fl_LoadFjord("test", dirdata = system.file("extdata", package = "FjordLight"))
  res_geo <- flget_geoparameters(dat_no_TS)
  expect_type(res_geo, "double")
})

Try the FjordLight package in your browser

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

FjordLight documentation built on Sept. 11, 2024, 9:12 p.m.