我必须修改标签的大小和绘图标题的大小。
我找到了一种仅修改轴标签和轴标题大小的方法。
此外,我不明白为什么当我指定了两者时,显示了 x 轴标题而没有显示 y 轴标题。
这是我的代码:
cc <- count(mydata, year_dx1, Age)
cc2 <- left_join(cc, count(cc, year_dx1, wt = n, name = 'nn'))
cc2 %>%
mutate(Percentage = (n / nn)*100) %>%
plot_ly(x = ~year_dx1, y = ~Percentage, color = ~Age) %>%
add_bars() %>%
layout(barmode = "stack")%>%
layout(title = 'Age at diagnosis distribution by time', xaxis
= list(title = 'Year of diagnosis',
yaxis = list(title = 'Count')))%>%
layout(
xaxis = list(titlefont = list(size = 22), tickfont =
list(size = 22)), …Run Code Online (Sandbox Code Playgroud)