小编Ste*_*bua的帖子

label=c("<25%","25 - 50%",">75%")
values=c(4,2,3)
df=data.frame(label,values)
plot_ly(df, labels = ~label, values = ~values,text=values,textposition="auto", type = 'pie') %>%layout(title = 'Percentage Effort time',showlegend=T,
     xaxis = list(showgrid = FALSE, zeroline = FALSE, showticklabels = FALSE),
     yaxis = list(showgrid = FALSE, zeroline = FALSE, showticklabels = FALSE))

当我运行此代码时，我会得到一个包含百分比和数字的饼图。如何获得四舍五入为整数而不是小数点的百分比？

v1=rep(c("a","b","c","d"),each=5)
v2=rep(c(10,12,9,7),each=5)
v3=c("y","y","w","y","y",rep(c("f"),times=5),rep(c("y"),times=4),"w",rep(c("k"),times=5))
v4=c("j","j","w","j","j",rep(c("q"),times=5),rep(c("l"),times=4),"w",rep(c("n"),times=5))
df=data.frame(v1,v2,v3,v4)

   v1 v2 v3 v4
1   a 10  y  j
2   a 10  y  j
3   a 10  w  w
4   a 10  y  j
5   a 10  y  j
6   b 12  f  q
7   b 12  f  q
8   b 12  f  q
9   b 12  f  q
10  b 12  f  q
11  c  9  y  l
12  c  9  y  l
13  c  9  y  l
14  c  9  y  l
15 …