在R中使用条形图与数据不匹配？

我想使用条形图或任何其他更好的选项来绘制以下数据：

   action_number times
1              1 13408
2              2  5550
3              3  2757
4              4  1782
5              5  1114
6              6   847
7              7   582
8              8   410
9              9   306
10            10   278
11            11   212
12            12   165
13            13   139
14            14   112
15            15   106
16            16    82
17            17    64
18            18    61
19            19    69
20            20    47
21            21    31
22            22    40
23            23    34
24            24    31
25            25    28
26            26    26
27            27    21
28            28    16
29            29    14
30            30    16
31            31    11
32            32    10
33            33    11
34            34    10
35            35     4
36            36     6
37            37     5
38            38     8
39            39     6
40            40     3
41            41     6
42            42     8
43            43     3
44            44     3
45            45     7
46            46     8
47            47     4
48            48     4
49            49     1
50            50     4
51            51     2
52            52     4
53            53     3
54            54     1
55            55     2
56            56     1
57            58     2
58            59     4
59            60     1
60            62     2
61            63     1
62            66     1
63            67     4
64            68     2
65            69     1
66            70     1
67            71     1
68            73     1
69            74     1
70            77     1
71            79     1
72            80     1
73            82     1
74            92     2
75            97     1
76            98     1
77           103     1
78           106     1
79           114     1
80           118     1
81           128     1
82           142     1
83           148     1
84           153     1
85           155     1
86           166     1
87           183     1
88           218     1
89           224     1
90           298     1
91           536     1

我正在使用以下内容，但与数据不匹配：

mp <- barplot(data$times,axes=FALSE,ylim=c(0,13408))
axis(1,at=data$action_number,labels=data$action_number)  
#??? Should I use at=data$action_number to at=data$times
axis(2,seq(0,91,3),c(0:30))

!！[在此处输入图像描述][1] 问题： -x轴没有536，它只指向224 -Y轴仅显示一个数字

---

您能给我一些建议吗？我是否应该使用任何软件包？

仍然不清楚，但可能是这样的

barplot(data$times, xlab=data$action_number)
mp <- barplot(data$times,axes=FALSE,ylim=c(0,13408))
axis(1,at=seq(1,91,10),labels=data$action_number[seq(1,91,10)])  
axis(2,seq(0,13408,500),seq(0,13408,500))

---

x和y是数字吗？还是因素？你能在这里粘贴dput输出吗？是的，我正在尝试用x轴作为动作编号，y轴作为次数的条形图，他们不允许我添加图像，我应该有10个或更多reputation@goodone-将链接发布到imgur.com或类似的地方，您可以在那里托管图像。如果它增加了问题，那么可以在中编辑。classdata$times和classdata$action\u number的输出是什么