我使用了以下ggplot命令:

ggplot(survey, aes(x = age)) + stat_bin(aes(n = nrow(h3), y = ..count.. / n), binwidth = 10)
  + scale_y_continuous(formatter = "percent", breaks = c(0, 0.1, 0.2))
  + facet_grid(hospital ~ .)
  + theme(panel.background = theme_blank())

生产

alt text

不过,我想把facet个标签改短一些(比如Hosp 1Hosp 2…)因为它们现在太长了,看起来很拥挤(增加图形的高度不是一个选项,它会占用文档中太多的空间).我看了facet_grid帮助页面,但不知道如何.

推荐答案

使用以下内容更改基础因子级别名称:

# Using the Iris data
> i <- iris
> levels(i$Species)
[1] "setosa"     "versicolor" "virginica" 
> levels(i$Species) <- c("S", "Ve", "Vi")
> ggplot(i, aes(Petal.Length)) + stat_bin() + facet_grid(Species ~ .)

R相关问答推荐

如何在球体上绘制轮廓线?

如何提高以键ID为列的表中键查找的效率?

R中的枢轴/转置

多个ggpredicate对象的平均值

卸载安装了BRM的模型发出的警告

使用R中相同值创建分组观测指标

如何在R中添加截止点到ROC曲线图?

使用sf或terra的LINESTRAING的累积长度

为什么当用osmdata映射R时会得到相邻状态?

我如何才能找到FAMILY=POISSON(LINK=&Q;LOG&Q;)中的模型预测指定值的日期?

根据现有列的名称和字符串的存在进行变异以创建多个新列

在不丢失空值的情况下取消列出嵌套列表

使用范围和单个数字将数字与字符串进行比较

当我们有多个反斜杠和/特殊字符时使用Gsubing

在GG图中绘制射线的自动程序

从多层嵌套列表构建Tibble?

如何根据其他列中的两个条件来计算数据帧中的行之间的差异?

是否有一个R函数可以输出在输入的字符向量中找到的相应正则表达式模式?

填充图例什么时候会有点?

在同一单元格中创建包含整数和百分比的交叉表