频率计数饼图

我使用了导入1列excel文件gdata,数据如下

3 4 3 3 1 4 1 3 2 3 1 1 4 2 3 3 2 6 1 1 3 3 2 2 2 2 1 3 2 1 6 1 3 2 2 1 2 2 4 2

我正在使用该pie(md[, 1])命令为数据创建饼图,但是,当我这样做时,我得到以下图表:

.

它将数据作为1-40,然后创建饼图宽度到数据样本,而不是有5个段(1,2,3,4,6),其宽度由结果出现的次数创建,即频率计数向量中的独特元素.我怎样才能做到这一点？

?table在应用之前使用该函数计算频率pie:

table(x)
#x
# 1  2  3  4  6 
#10 13 11  4  2 

然后,生成频率饼图:

pie(table(x))

生产:

x <- scan(text = "3 4 3 3 1 4 1 3 2 3 1 1 4 2 3 3 2 6 1 1 3 3 2 2 2 2 1 3 2 1 6 1 3 2 2 1 2 2 4 2")