From 37a1513d73201dbacc71af3c33a2a2a4e798583c Mon Sep 17 00:00:00 2001
From: Johannes Ranke
@@ -186,7 +187,7 @@ be shown if max_twa is not NULL. -- cgit v1.2.1# Use a fitted mkinfit model -m_2 <- mkinmod(parent = mkinsub("SFO", "m1"), m1 = mkinsub("SFO"))#>fit_2 <- mkinfit(m_2, FOCUS_2006_D, quiet = TRUE)#> Warning: Observations with value of zero were removed from the datapred_2 <- one_box(fit_2, ini = 1) +m_2 <- mkinmod(parent = mkinsub("SFO", "m1"), m1 = mkinsub("SFO"))#>fit_2 <- mkinfit(m_2, FOCUS_2006_D, quiet = TRUE) +pred_2 <- one_box(fit_2, ini = 1) pred_2_saw <- sawtooth(pred_2, 2, 7) plot(pred_2_saw, max_twa = 21, max_twa_var = "m1")