R barplot函数固定列宽和名称

Question

我一直致力于使用 split 和 table 函数为一些数据集创建条形图。尽管在过程结束时给出了条形图，但我无法更改条形大小及其名称。

我的数据集名称是AKP.Slogans，它有两列，分别是tweet_created_at（POSIXct，格式：“2015-05-08 00:07:58”）和hashtag_text (chr"ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar").

数据集样本：

tweet_created_at    hashtag_text 
5/8/2015 0:07   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:10   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 2:50   onlarkonusurakpartiyapar
5/8/2015 0:10   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 2:53   onlarkonusurakpartiyapar,pinokyokemal
5/8/2015 0:11   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:11   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 2:53   bingolunkararibuyumenindevami,onlarkonusurakpartiyapar
5/8/2015 0:11   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:16   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 2:54   onlarkonusurakpartiyapar
5/8/2015 0:16   onlarkonusurakpartiyapar
5/8/2015 0:43   onlarkonusurakpartiyapar,halkinbasbakanitokatta
5/8/2015 0:56   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:56   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:56   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:56   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 2:59   onlarkonusurakpartiyapar
5/8/2015 0:56   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:56   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:01   akp,onlarkonusurakpartiyapar
5/8/2015 0:03   onlarkonusurakpartiyapar
5/8/2015 0:04   onlarkonusurakpartiyapar
5/8/2015 0:04   onlarkonusurakpartiyapar,pinokyokemal,oyunuboz
5/8/2015 0:05   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:05   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:05   onlarkonusurakpartiyapar
5/8/2015 0:05   onlarkonusurakpartiyapar
5/8/2015 0:05   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:05   onlarkonusurakpartiyapar
5/8/2015 0:06   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:06   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:06   onlarkonusurakpartiyapar
5/8/2015 0:06   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:06   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:07   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:07   onlarkonusurakpartiyapar
5/8/2015 0:07   onlarkonusurakpartiyapar
5/8/2015 0:07   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:08   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:08   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:08   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:08   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:09   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:08   ak,onlarkonusurakpartiyapar
5/8/2015 0:08   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:08   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:08   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:09   akp,onlarkonusurakpartiyapar
5/8/2015 0:09   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:09   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:09   ogretmenatamaicin13mayistaankarada,onlarkonusurakpartiyapar
5/8/2015 0:09   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:09   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:09   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:09   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:09   ogretmenatamaicin13mayistaankarada,onlarkonusurakpartiyapar
5/8/2015 0:10   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:10   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:10   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:10   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:10   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:10   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:10   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:10   onlarkonusurakpartiyapar
5/8/2015 0:10   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:10   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:10   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:10   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:12   onlarkonusurakpartiyapar
5/8/2015 0:13   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:13   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:13   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:13   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:13   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:13   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:13   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:13   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:13   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:13   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:13   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:13   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:13   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:13   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:13   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:13   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:14   onlarkonusurakpartiyapar,pinokyokemal,oyunuboz
5/8/2015 0:15   onlarkonusurakpartiyapar
5/8/2015 0:15   onlarkonusurakpartiyapar
5/8/2015 0:15   onlarkonusurakpartiyapar
5/8/2015 0:16   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:16   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:16   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:16   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:16   ak,onlarkonusurakpartiyapar
5/8/2015 0:17   ogretmenemayistamujdehazirandaatama,onlarkonusurakpartiyapar
5/8/2015 0:17   onlarkonusurakpartiyapar
5/8/2015 0:17   onlarkonusurakpartiyapar
5/8/2015 0:17   onlarkonusurakpartiyapar
5/8/2015 0:17   ak,onlarkonusurakpartiyapar

我使用这个函数来拆分每个主题标签并将它们添加到一个新的数据集。在它为它们创建一个 table 并将它们放入 barplot 之后。

t.plot=function (histogram){
  library(splitstackshape)
  histogram=cSplit(histogram, 'hashtag_text', ',', 'long')
  histogram=table(histogram$hashtag_text)
  barplot(histogram[order(histogram,decreasing=T)], width=1,main="Hashatag Frequency",xlab="Hahstags",ylab="Frequency")
  } 
t.plot(AKP.Slogans)

100 个数据的结果很好，但对于所有数据集，它产生了一些非常奇怪的东西。我怎样才能创建第一张图片。我可以选出十个重复次数最多的话题标签。
我检查了其他问题，但找不到答案，或者我不明白如何将它们应用到我的问题中。

前 100 行的示例

所有数据集的示例

谢谢，

Answer 1

尝试在 barplot 中使用 [1:10] 修改函数：

t.plot=function (histogram){
  library(splitstackshape)
  histogram=cSplit(histogram, 'hashtag_text', ',', 'long')
  histogram=table(histogram$hashtag_text)
  barplot(histogram[order(histogram,decreasing=T)][1:10], width=1,main="Hashatag Frequency",xlab="Hahstags",ylab="Frequency")
histogram[order(histogram,decreasing=T)][1:10] # to get the Htgs
}

R barplot函数固定列宽和名称

R barplot function fix column width and name

plot

r

width

bar-chart