diff options
-rw-r--r-- | inst/GUI/gmkin.R | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/inst/GUI/gmkin.R b/inst/GUI/gmkin.R index 6de4de2..40045e9 100644 --- a/inst/GUI/gmkin.R +++ b/inst/GUI/gmkin.R @@ -391,6 +391,7 @@ keep_ds_changes_handler <- function(h, ...) { ds[[ds.cur]]$sampling_times <<- sort(unique(tmpd$time))
ds[[ds.cur]]$time_unit <<- svalue(ds.e.stu)
ds[[ds.cur]]$observed <<- unique(tmpd$name)
+ observed.all <<- union(observed.all, ds[[ds.cur]]$observed)
ds[[ds.cur]]$unit <<- svalue(ds.e.obu)
ds[[ds.cur]]$replicates <<- max(aggregate(tmpd$time,
list(tmpd$time, tmpd$name), length)$x)
|