Я использую функцию ggarange
из библиотеки ggpubr
для построения 2 круговых диаграмм.Проблема в том, что функция annotate_figure
не выполняет то, что я действительно хочу.
final_plot<-ggarrange(plot1,plot2,ncol=2,common.legend=TRUE, legend = "right")
final_plot %>%
annotate_figure(
top = text_grob(
"In 2017, U.S citizens prefer to use \nstation-based bikes rather than dockless bikes",
size = 14,
face = 'bold'
),
fig.lab =
"Source : NACTO\nScope : Shared-Bikes in the U.S. in 2017\nNote : NACTO's estimate for trips with shared bikes figure among all bike users"
,
fig.lab.pos = "bottom.left",
fig.lab.size = 8,
fig.lab.face = "bold"
)
Это выходной показатель:
![enter image description here](https://i.stack.imgur.com/cpDhS.png)
Как можно избежать сгенерированного слева пробела в моем тексте fig.label каждый раз, когда я иду на новой строке (т.е. я хочу, чтобы все 3 строки были выровнены по левому краю)?
Спасибо за любую помощь !!!