如何使用 R 中的 plotly 为 WorldPhones 数据集创建堆叠条形图？

Question

我需要使用 R 为WorldPhones数据集制作条形图，使用plotly ，但我在处理数据以使其成为堆叠条形图中的有效输入时遇到了困难。 整个数据集将包含在图中。

Answer 1

由于我没有有关您要查找的内容的详细信息，因此您可以使用它来开始：

library(plotly)

# with the countries stacked by year:
df <- WorldPhones %>% as.data.frame() 
#      N.Amer Europe Asia S.Amer Oceania Africa Mid.Amer
# 1951  45939  21574 2876   1815    1646     89      555
# 1956  60423  29990 4708   2568    2366   1411      733
# 1957  64721  32510 5230   2695    2526   1546      773
# 1958  68484  35218 6662   2845    2691   1663      836
# 1959  71799  37598 6856   3000    2868   1769      911
# 1960  76036  40341 8220   3145    3054   1905     1008
# 1961  79831  43173 9053   3338    3224   2005     1076 


(fig <- plot_ly(df, x = ~row.names(df), y = ~N.Amer, type = 'bar', name = 'N. America') %>% 
  add_trace(y = ~Europe, name = 'Europe') %>% 
  add_trace(y = ~Asia, name = 'Asia') %>% 
  add_trace(y = ~S.Amer, name = "S. America") %>% 
  add_trace(y = ~Oceania, name = "Oceania") %>% 
  add_trace(y = ~Africa, name = "Africa") %>% 
  add_trace(y = ~Mid.Amer, name = "Mid America") %>% 
  layout(yaxis = list(title = "Count"), 
         xaxis = list(title = ""), 
         barmode = 'stack'))