r - 如何使垂直标签适合打印窗口？

Question

我正在R中创建一个直方图，该直方图显示矢量中多个事件的频率。每个事件由[1，9]范围内的整数表示。我在图表下方垂直显示每个计数的标签。这是代码：

hist(vector, axes = FALSE, breaks = chartBreaks)
axis(1, at = tickMarks, labels = eventTypes, las = 2, tick = FALSE) 

不幸的是，标签太长，因此它们被窗口底部切断。如何使它们可见？我什至使用正确的图表吗？

Answer 1

这听起来不像是直方图的工作-事件不是连续变量。条状图或点状图可能更合适。

一些虚拟数据

set.seed(123)
vec <- sample(1:9, 100, replace = TRUE)
vec <- factor(vec, labels = paste("My long event name", 1:9))

条形图通过 barplot()函数生成-为方便起见，我们使用 table()函数为它提供每个事件的计数。在这里，我们需要使用 las = 2旋转标签，并在边缘留出一些额外的空间

## lots of extra space in the margin for side 1
op <- par(mar = c(10,4,4,2) + 0.1)
barplot(table(vec), las = 2)
par(op) ## reset

点图是通过函数 dotchart()生成的，它为我们提供了更好的排序图边距的便利

dotchart(table(vec))

点状图比条状图的优势在于使用更少的墨水来显示相同​​的信息，并着重于各组之间计数的差异而不是计数的大小。

注意我如何将数据设置为一个因素。这使我们可以将事件标签存储为因子的标签-从而使图中的轴的标签自动化。这也是存储数据的自然方式，就像我了解您所拥有的那样。