Skip to contents

S3 method for printing shorts_model object

Usage

# S3 method for shorts_model
print(x, ...)

Arguments

x

shorts_model object

...

Not used

Examples

split_distances <- c(10, 20, 30, 40, 50)
split_times <- create_timing_gates_splits(
  gates = split_distances,
  MSS = 10,
  MAC = 9,
  FD = 0.25,
  TC = 0
)

# Simple model
simple_model <- model_timing_gates(split_distances, split_times)
simple_model
#> Estimated model parameters
#> --------------------------
#>        MSS        MAC        TAU       PMAX 
#>  9.7809915 12.4128049  0.7879759 30.3523847 
#> 
#> Model fit estimators
#> --------------------
#>             R2        meanErr   meanErr_perc         minErr    minErr_perc 
#>    0.999905836   -0.000953123   -0.141465876   -0.023346388   -1.374616927 
#>         maxErr    maxErr_perc      maxAbsErr maxAbsErr_perc           RMSE 
#>    0.015046445    0.389376647    0.023346388    1.374616927    0.014570617 
#>      RMSE_perc            MAE       MAE_perc 
#>    0.669726995    0.013255750    0.491106517