Я пытаюсь получить 2 графика на одном графике с двойной осью y, один с линейной шкалой, а другой с логарифмической шкалой c. (Я знаю, что это не очень хорошая практика в целом ...) Первый диапазон данных от 0 до 2500, это те, которые я хочу видеть линейными. Второй диапазон данных от 0 до 50.000, они должны быть представлены в логарифмической шкале c. Сюжет выглядит нормально, но я не уверен, так как мне не удается правильно обработать тики второй оси. Я хотел бы видеть на своей второй оси простой логарифмический масштаб c, например (100,1000, 10000), как я могу это сделать? Я пытался играть с перерывами, но пока безуспешно.
Test<-ggplot()+
geom_area(
aes(x=DateReport1,y=TotalCases_log10*1000),
fill=alpha("grey",0.7),
data=CountryData)+
geom_bar(stat="identity",
aes(x=DateReport1,y=NewCases),
fill="#D86422",size=0.6,
data=CountryData)+
scale_y_continuous(sec.axis = sec_axis(~ log10(.)*1000))
![Plot](https://i.stack.imgur.com/QV6ms.png)