如何使用 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'))