更改简单条形图中每列的字体大小，以便所有标签都可见？

Question

这是我用来创建 table

的代码

barplot(sort(table(df$Department_lower), decreasing=TRUE))

这是 table 数据的示例

这是结果。我们需要所有列的标签都可见

Answer 1

一个选项是使用 las = 2 旋转 x-axis 的标签。我创建了一些额外的随机标签来为您提供可重现的示例。首先是之前的情节：

df <- data.frame(Department_lower=sample(c('labelA', 'entrees', 'salad', 'labelB', 'general', 'catering', 'swag', 'labelC', 'labelD'),
                                   50, replace=TRUE))

plot <- barplot(sort(table(df$Department_lower), decreasing=TRUE))

之前：

旋转 x-axis 个标签：

plot <- barplot(sort(table(df$Department_lower), decreasing=TRUE), las = 2)

输出：

更改简单条形图中每列的字体大小，以便所有标签都可见？

Change font size of each column in simple bar plot so that all labels are visible?

plot

r