library(gmkin)
app <- gmkin(script = "~/git/gmkin/inst/GUI/gmkin.R")
s <- gmkin:::get_current_session(app)
s$show_fit_option_widgets(TRUE)
s$f.run$call_Ext("enable")
names(s)
s$ftmp$reweight.max.iter
s$ftmp$maxit
names(s$ftmp)
s$ws$ftmp$maxit
s$f.run$call_Ext("enable")
s$f.gg.parms[,]
s$show_fit_option_widgets
svalue(s$f.gg.opts.reweight.tol) <-
svalue(s$f.gg.opts.error_model)
svalue(s$f.gg.opts.error_model_algorithm)
visible(s$f.gg.opts.g) <- TRUE
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.