tests/testthat/test-grab_coefs.R
In kimgannon/bis557: Contains Homework Assignments for BIS 557 2020
context("Testing grab coefficients")
library(palmerpenguins)
data("penguins")
fit <- lm (bill_length_mm ~., data = penguins[,-8])
coefs <- as.vector(grab_coefs(fit))
expect_equal(round(coefs), c(15, 10, 6, -1, 0, 0, 0, 0, 2))
kimgannon/bis557 documentation built on Nov. 25, 2020, 7:09 a.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("Testing grab coefficients")
library(palmerpenguins)
data("penguins")
fit <- lm (bill_length_mm ~., data = penguins[,-8])
coefs <- as.vector(grab_coefs(fit))
expect_equal(round(coefs), c(15, 10, 6, -1, 0, 0, 0, 0, 2))
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.