Commit 5b176169 authored by houyun's avatar houyun
Browse files

fixed child axis error when not symmetric

parent 8fc96820

R/experimental-fun.R

+1 −1
Original line number Diff line number Diff line
@@ -507,7 +507,7 @@ plot_type <- function(...) { 
    ct <- rep_len(ct, 4)

    dc <- rep_len(dc, 4)

    axis_info <- purrr::map_dfr(names(source_data), function(vars) {

      xx <- data[[vars]]

      xx <- source_data[[vars]]

      limits <- .get_limits(xx, expansion = if (is.numeric(xx)) ct else dc)

      if (is.numeric(xx)) {

        breaks <- pretty_in_range(xx)

CRA Git | Maintained and supported by SUSTech CRA and CCSE