invoercontrole - foutmelding mbt te grote omtrekken - enkel bij afgeleide functie

[leymanan]

Els, ik krijg een foutmelding bij fit.afgeleid, na opnieuw runnen van initiatie

> if (inlezen_uitzonderingen) {
+   Datalijst <- initiatie(Data, Uitzonderingen)      
+  } else {
+   Datalijst <- initiatie(Data)
+ }

> Data.basis <- Datalijst[["Basis"]]
> Data.afgeleid <- Datalijst[["Afgeleid"]]
> Data.lokaal <- Datalijst[["Lokaal"]]
> Data.rest <- Datalijst[["Rest"]]
> VerwijderdeGegevens <- Datalijst[["VerwijderdeGegevens"]]

> Basismodel <- fit.basis(Data.basis)

> Afgeleidmodel <- fit.afgeleid(Data.afgeleid, Basismodel)
Error in invoercontrole(Data.afgeleid, "fit") : 
  Omtrek bevat waarden die geen geldige omtrekklassen zijn
            (geldige omtrekklassen zijn 0.15, 0.25, 0.35, 0.45,... t.e.m. 2.65)

Nieuwe initiatie-functie neemt immers ook grote omtrekken mee (tot 4.55 cm omtrek) Anderzijds geen foutmelding bij fit.basis en fit.lokaal

[ElsLommelen]

Oeps, sorry, over het hoofd gezien, ik hoop dat deze aanpassing het probleem oplost?

[leymanan]

geen probleem! Ik krijg nu net iets andere foutmelding (bij de uitbreiding)

> Afgeleidmodel <- fit.afgeleid(Data.afgeleid, Basismodel)
|========                                                   | 15% ~2 m remaining     
Error in invoercontrole(Soortdata, "fit", Uitbreiding = Uitbreiding) : 
  Omtrek bevat waarden die geen geldige omtrekklassen zijn
            (geldige omtrekklassen zijn 0.15, 0.25, 0.35, 0.45,... t.e.m. 2.65)

[ElsLommelen]

Lap, mijn unittest deugde niet (waardoor ik die error niet kreeg), nu zou het wel in orde moeten zijn (en de unittest ook).

[leymanan]

Is inderdaad in orde, bedankt!

[leymanan]

Els, ook gelijkaardige foutmelding bij functie resultaat

> curves_all <- resultaat(Basismodel, Afgeleidmodel, Lokaalmodel, Data.lokaal, Data.rest) %>% 
+   ungroup()
|========================================================== |100% ~0 s remaining     Error in invoercontrole(Data.lokaal, "fit") : 
  Omtrek bevat waarden die geen geldige omtrekklassen zijn
            (geldige omtrekklassen zijn 0.15, 0.25, 0.35, 0.45,... t.e.m. 2.65)

[ElsLommelen]

Kan je even testen of met deze oplossing de foutmelding weg is?

[leymanan]

nu iets andere foutmelding

> nieuwe_curves <-
+   resultaat(Basismodel, Afgeleidmodel, Lokaalmodel, Data.lokaal, Data.rest)
|===========================================================|100% ~0 s remaining     Error in invoercontrole(Data.onbruikbaar, "fit") : 
  Omtrek bevat waarden die geen geldige omtrekklassen zijn
            (geldige omtrekklassen zijn 0.15, 0.25, 0.35, 0.45,... t.e.m. 2.65)

[ElsLommelen]

Oeps, ik hoop dat het nu wel in orde is?

[leymanan]

jaja, is nu OK! bedankt!