R - Highcharter, как избежать увеличения отступа метки оси y?

Есть ли способ избежать увеличения отступа метки оси Y на каждом последующем графике?

library(xts)
library(highcharter)

dates = seq(as.Date("2012-01-01"), as.Date("2012-01-04"), by="day")
x1 = xts(c(2,3,1,5), dates)
x2 = xts(c(1,1.5,2,1), dates)

highchart(type = "stock") %>%
   hc_yAxis_multiples(
     list(top = "0%", height = "60%", title = list(text = "Var1")),
     list(top = "60%", height = "40%", title = list(text = "Var2"))) %>%
   hc_add_series(x1, yAxis=0, compare="percent", color="blue") %>%
   hc_add_series(x2, yAxis=1, color="black")

Созданный график:

введите здесь описание изображения


r highcharts r-highcharter
person Laurence_jj    schedule 11.11.2019    source источник

Ответы (1)


arrow_upward
1
arrow_downward

Это можно исправить, вручную установив offset второй оси y. Из справочника API:

смещение: число

Расстояние в пикселях от области графика до осевой линии. Положительное смещение перемещает ось вместе с линией, метками и отметками от области построения. Обычно это используется, когда две или более оси отображаются на одной стороне графика. При использовании нескольких осей смещение динамически регулируется во избежание столкновений, это можно изменить, явно задав смещение.

По умолчанию 0.

highchart(type = "stock") %>%
  hc_yAxis_multiples(
    list(top = "0%", height = "60%", title = list(text = "Var1")),
    list(top = "60%", height = "40%", offset = 0, title = list(text = "Var2"))) %>%
  hc_add_series(x1, yAxis=0, compare="percent", color="blue") %>%
  hc_add_series(x2, yAxis=1, color="black")

введите здесь описание изображения

person Iaroslav Domin    schedule 11.11.2019