Skip to content

Commit 14797db

Browse files
committed
Ignore more quantile names
1 parent 8677d50 commit 14797db

1 file changed

Lines changed: 5 additions & 5 deletions

File tree

R/ppc-intervals.R

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -298,11 +298,11 @@ label_x <- function(x) {
298298
grouped_d,
299299
outer_width = prob_outer,
300300
inner_width = prob,
301-
ll = quantile(!! val_col, probs = probs[1]),
302-
l = quantile(!! val_col, probs = probs[2]),
303-
m = quantile(!! val_col, probs = probs[3]),
304-
h = quantile(!! val_col, probs = probs[4]),
305-
hh = quantile(!! val_col, probs = probs[5])
301+
ll = unname(quantile(!! val_col, probs = probs[1])),
302+
l = unname(quantile(!! val_col, probs = probs[2])),
303+
m = unname(quantile(!! val_col, probs = probs[3])),
304+
h = unname(quantile(!! val_col, probs = probs[4])),
305+
hh = unname(quantile(!! val_col, probs = probs[5]))
306306
))
307307
}
308308

0 commit comments

Comments
 (0)