[Stable]

Extracts OFV from .ext file.

ofv(r)

Arguments

r

An nm object.

Value

The numeric value of the OFV.

Examples


# create example object m1 from package demo files
exdir <- system.file("extdata", "examples", "theopp", package = "NMproject")
m1 <- new_nm(run_id = "m1", 
             based_on = file.path(exdir, "Models", "ADVAN2.mod"),
             data_path = file.path(exdir, "SourceData", "THEOPP.csv"))

is_finished(m1) ## FALSE until run is completed
#> [1] FALSE
ofv(m1) ## NA until m1 is finished
#> [1] NA