Test the fit of a model on a train and test set.

Test the fit of a model on a train and test set.

Usage

fit_stats(model, df_train, df_test)

fitstats(model, df_train, df_test)

Arguments

model

An lm model.

df_train

A data frame with the training data.

df_test

A data frame with the test data.

Value

A data frame with the fit statistics.

Examples

set.seed(123)
parts <- split_data(Fingers)
model <- lm(Thumb ~ Height, data = parts$train)
fit_stats(model, parts$train, parts$test)
#> # A tibble: 2 × 4
#>   data      F    PRE  RMSE
#>   <chr> <dbl>  <dbl> <dbl>
#> 1 train 24.6  0.187   8.34
#> 2 test   5.08 0.0994  6.84
fitstats(model, parts$train, parts$test)
#> # A tibble: 2 × 4
#>   data      F    PRE  RMSE
#>   <chr> <dbl>  <dbl> <dbl>
#> 1 train 24.6  0.187   8.34
#> 2 test   5.08 0.0994  6.84