data(pf_models)
model_details <- list(name = "River", creator = "Helena Glory",
constraints = "non-negative", validation = "split-half", unit= "RU")
eempf_openfluor(pf4[[1]],file.path(tempdir(),"openfluor_example.txt"),
upload = FALSE, model_details = model_details)
Run the code above in your browser using DataLab