Nothing
add.SOS <- function(lprec, name, type, priority, columns, weights)
{
.Call(RlpSolve_add_SOS, lprec, as.character(name), as.integer(type),
as.integer(priority), as.integer(columns), as.double(weights))
invisible()
}
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.