# load('data/convert_data.RData')
#.modelCode <- list(GAMS = list(reduced = readLines('gams/model_reduced.gms')),
# GLPK = list(reduced = readLines('glpk/glpk_reduced.mod')))
#save(file = 'data/modelCode.RData', list = 'modelCode')
#.modelCode <- list(GAMS = readLines('gams/energyRt.gms'),
# GLPK = readLines('glpk/energyRt.mod'))
# data("convert_data")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.