Nothing
library(testit)
library(vpc)
nonmem_df <- data.frame(ID = 0, MDV = 0, DV = 0)
phx_df <- data.frame(ID = 0, COBS = 0)
assert("software type returned properly",
vpc:::guess_software("NONmem", nonmem_df) == "nonmem")
assert("software type returned properly",
vpc:::guess_software("nonmem", phx_df) == "nonmem")
assert("software type returned properly",
vpc:::guess_software("auto", nonmem_df) == "nonmem")
assert("software type returned properly",
vpc:::guess_software("auto", phx_df) == "phoenix")
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.