我必须修改标签的大小和绘图标题的大小。
我找到了一种仅修改轴标签和轴标题大小的方法。
此外，我不明白为什么当我指定了两者时，显示了 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)), …我有 ID 号内的姓名数据以及许多关联值。它看起来像这样：
structure(list(id = c("a", "a", "b", "b"), name = c("bob", "jane",
"mark", "brittney"), number = c(1L, 2L, 1L, 2L), value = c(1L,
2L, 1L, 2L)), class = "data.frame", row.names = c(NA, -4L))
# id name number value
# 1 a bob 1 1
# 2 a jane 2 2
# 3 b mark 1 1
# 4 b brittney 2 2
我想创建 的所有组合name，无论有多少个，并将它们粘贴在一起并用逗号分隔，并对每个组合中的number和求和。上例所需的输出是：valueid
structure(list(id = c("a", "a", "a", "b", "b", "b"), name …