aboutsummaryrefslogtreecommitdiff
path: root/test.R
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2019-07-08 18:11:26 +0200
committerJohannes Ranke <jranke@uni-bremen.de>2019-07-08 18:11:26 +0200
commit15ced413958fe8f7a1f9bac6f9224a978f29aa03 (patch)
treed542df8ece4fe4c47dc40491da4dbb36c8718370 /test.R
parent06d7cf75f918e53c9b3c4aa0a9a8654cd7181136 (diff)
Now working with mkin >= 0.9.49.6
Diffstat (limited to 'test.R')
-rw-r--r--test.R21
1 files changed, 21 insertions, 0 deletions
diff --git a/test.R b/test.R
new file mode 100644
index 0000000..eb61a1a
--- /dev/null
+++ b/test.R
@@ -0,0 +1,21 @@
+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

Contact - Imprint