tests/testthat/test_neg_check.R
In txm676/sars: Fit and Compare Species-Area Relationship Models Using Multimodel Inference
context("neg_check")
library(sars)
test_that("neg_check returns correct results for individual model fits", {
data(galap)
data(niering)
fit <- sar_loga(galap)
expect_true(fit$neg_check)
expect_true(summary(fit)$Negative_values)
fit2 <- sar_power(galap)
expect_false(fit2$neg_check)
fit3 <- sar_linear(niering)
expect_false(fit3$neg_check)
})
txm676/sars documentation built on Nov. 20, 2023, 7:29 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
context("neg_check")
library(sars)
test_that("neg_check returns correct results for individual model fits", {
data(galap)
data(niering)
fit <- sar_loga(galap)
expect_true(fit$neg_check)
expect_true(summary(fit)$Negative_values)
fit2 <- sar_power(galap)
expect_false(fit2$neg_check)
fit3 <- sar_linear(niering)
expect_false(fit3$neg_check)
})
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.