ggvis R -how以降序显示数据？

Question

我使用以下代码，按V1的降序创建条形图：

AvgOverallkeyword<- arrange(AvgOverallkeyword,desc(V1))
ggvis(AvgOverallkeyword,x=~Keyword,y=~V1)%>% layer_bars(fill:="orange")

I am getting attached chart instead[1]
  AvgOverallkeyword is in below format:
 Keyword    V1
 BWB        67.92
 Ebill      2.26
 LI Ver     2.16
 Start Svc  1.85

我做错了什么，可能是非常愚蠢的事情!!