R中的条形图来自具有两个变量的因子

Question

我使用以下代码计算了一个子集的加权平均值：

regionsales <- ddply(d, ~Region, summarize, weighted.mean(sales, w=size)

这给了我一个有两个变量和五个观察的因素：

Region    Sales
1         34
2         87
3         92
4         103
5         29

我想在R中制作一个条形图，其中x轴是区域编号，y轴是（平均）销售数。我尝试过：

library(plotly)
p <- plot_ly(
x = regionsales$Region,
y = regionsales$Sales,
name = "Sales",
type = "bar")

但它不起作用。任何人都可以帮助我吗？