summarise_draws: assign output class #47

stan-dev · Nov 13, 2019 · 6cb1309 · 6cb1309
1 parent 3ea428d
commit 6cb1309
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/summarise_draws.R b/R/summarise_draws.R
@@ -111,6 +111,7 @@ summarise_draws.draws <- function(x,
   }
   out$variable <- variables
   out <- move_to_start(out, "variable")
+  class(out) <- c("draws_summary", class(out))
   out
 }