Если вы хотите объединить несколько осей Y с перевернутой диаграммой, я предлагаю определить их вручную (без create_yaxis метода), см .:
library("highcharter");
highchart() %>%
hc_chart(inverted=T) %>%
hc_yAxis_multiples(
list(width = '30%'),
list(width = '30%', left = '35%', offset = 0),
list(width = '30%', left = '70%', offset = 0)
) %>%
hc_add_series(data = c(1,3,2)) %>%
hc_add_series(data = c(20, 40, 10), yAxis = 1) %>%
hc_add_series(data = c(200, 400, 500), type = "column", yAxis = 2)
Также у вас есть опечатка в " hc_chart (инвертированный = T)%>% "
В примере, представленном вами в jsFiddle, для каждой диаграммы есть отдельные контейнеры. В вашем примере у вас есть один контейнер, но множество серий соединены с отдельной осью, поэтому вам нужно определить их ширину и левое смещение.
Справочник по API: https://api.highcharts.com/highcharts/yAxis.width https://api.highcharts.com/highcharts/yAxis.left
https://api.highcharts.com/highcharts/yAxis.offset
Дайте мне знать, если у вас есть дополнительные вопросы.