diff --git a/R/data_xtabulate.R b/R/data_xtabulate.R index 939019f38..b11e7116d 100644 --- a/R/data_xtabulate.R +++ b/R/data_xtabulate.R @@ -54,6 +54,7 @@ # we want to round N for weighted frequencies if (!is.null(weights)) { out$N <- round(out$N) + tota_n <- round(total_n) } out <- data_to_wide(out, values_from = "N", names_from = "by")