getRates<-function(modelFile){ LP<-Linp(modelFile) unlist(as.data.frame(LP$X)) #optimized rates from the model file }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.