我正在从mongodb获取数据。我需要用百分比显示条形图或饼图中的语言,但我无法做到。到目前为止,这是我的代码。
library(mongolite)
library(ggplot2)
# Connect to mongolabs
con <- mongo("tweets", url = "mongodb://a12345:a12345@127.0.0.1:27017/newDatabase")
# Query data
mydata <- con$find(
fields = '{"lang" : true}'
)
print(mydata)
options(max.print=1000000)
和控制台输出:
我是否需要使用for循环计算每种语言的计数,并采用类似的形式:
lang count
1 eng 25
2 tr 25
3 de 50
然后,用这样的代码? (参考:http://www.sthda.com/english/wiki/ggplot2-pie-chart-quick-start-guide-r-software-and-data-visualization)
library(ggplot2)
# Barplot
bp<- ggplot(df, aes(x="", y=count, fill=lang))+
geom_bar(width = 1, stat = "identity")
bp
或者,有更简单的方法吗?