原数据集data3的水平有48个，我将其中7个水平赋值给了data3_count，发现进行levels(data3_count)之后仍然是48个，导致最后做盒须图时，横坐标刻度过多，请问如何解决
部分脚本如下：
。。。。。
data3_count<-data3_count[data3_count￥freq>10,]#取出有评分的电影数量大于10部的国家
sum(data3_count￥freq)#求出用来分析的数据总数
data3_select<-data3[data3￥language==data3_count[1,1],]#将这部分数据叠加作为新的分析列表
for(i in 2:7){data3_select<-rbind(data3_select,data3[data3￥language==data3_count[i,1],])}
boxplot(data3_select$imdb_score~data3_select￥language)#做盒须图

。。。。