Merge pull request #283 from alan-turing-institute/fix_vd_extract_order

fix vd extract order bug

Author: RaphaelS1

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: distr6
 Title: The Complete R6 Probability Distributions Interface
-Version: 1.6.12
+Version: 1.6.13
 Authors@R:
     c(person(given = "Raphael",
              family = "Sonabend",

NEWS.md

@@ -1,3 +1,7 @@
+# distr6 1.6.13
+
+* Fix reordering bug when extracting vector distributions
+
 # distr6 1.6.12
 
 * Fix minor bug causing decorators not to be carried forward when using `rep`

R/Wrapper_VectorDistribution.R

@@ -1153,7 +1153,7 @@ or `distlist` should be used.")
       return(dist)
     } else {
       id <- as.character(unlist(vecdist$modelTable[i, 2]))
-      pars <- vecdist$parameters()$values
+      pars <- private(vecdist$parameters())$.value
       pars <- pars[grepl(paste0("^", id, "__", collapse = "|"), names(pars))]
 
       return(VectorDistribution$new(