## due to the need of a valid account, this function cannot be
## tested with generic data.
## Please use your own account to do so.
if (FALSE) {
data(pf_models)
file <- file.path(tempdir(),"openfluor_example.txt")
eempf_openfluor(pf4[[1]],file)
eempf_OF_upload("helena.glory@rur.play", file)
}
Run the code above in your browser using DataLab