修改 r 中的 ggplot x 轴刻度标签
本文将介绍如何在 r 中修改 ggplot x 轴刻度标签。
使用 scale_x_discrete 修改 r 中的 ggplot x 轴刻度标签
scale_x_discrete 与 scale_y_discrete 一起用于对绘图比例标签和限制进行高级操作。在这种情况下，我们使用 scale_x_discrete 来修改 ggplot 对象的 x 轴刻度标签。请注意，第一个 ggplot 对象是基于 diamonds 数据集的条形图。该图使用 cut 列并在 y 轴上绘制每种类型的计数。x 轴具有默认标题 - cut，可以通过将字符串作为 scale_x_discrete 的第一个参数进行修改。或者，我们可以通过构造一个向量并将其分配给 labels 参数来为每个标签传递特定的字符串值。两个图都是使用 grid.arrange 函数并排绘制的，grid.arrange 函数是 gridextra 包的一部分。
library(ggplot2)
library(gridextra)
p1 <- ggplot(diamonds, aes(cut)) geom_bar(fill = "orange") scale_x_discrete("cut")
p2 <- p1 scale_x_discrete("cut type", labels = c("fair" = "f","good" = "g", "very good" = "vg","premium" = "p","ideal" = "i"))
grid.arrange(p1, p2, ncol = 2)
修改 x 轴上标签的另一种有用方法是将函数对象作为 labels 参数传递。下一个代码片段使用 abbreviate 函数自动缩短标签，然后将图形绘制为两列。
library(ggplot2)
library(gridextra)
p1 <- ggplot(diamonds, aes(cut)) geom_bar(fill = "orange") scale_x_discrete("cut")
p2 <- p1 scale_x_discrete("cut type", labels = c("fair" = "f","good" = "g", "very good" = "vg","premium" = "p","ideal" = "i"))
p3 <- p1 scale_x_discrete("cut type", labels = abbreviate)
grid.arrange(p2, p3, ncol = 2)
scale_x_discrete 在不同的图上的工作方式类似，标签操作技术是适用的，如下例所示。也就是说，从 mpg 数据集中绘制了几个散点图。
library(ggplot2)
library(gridextra)
p1 <- ggplot(mpg, aes(manufacturer, cty)) geom_point()
p2 <- ggplot(mpg, aes(manufacturer, cty)) geom_point()
scale_x_discrete(labels = abbreviate)
p3 <- ggplot(mpg, aes(manufacturer, cty)) geom_point(colour = "blue")
scale_x_discrete(labels = abbreviate)
grid.arrange(p1, p2, p3, nrow = 3)
使用 scale_x_discrete 和自定义函数来修改 r 中的 ggplot x 轴刻度标签
scale_x_discrete 参数 labels 可以采用自定义函数对象来相应地修改每个刻度标签。在这种情况下，我们实现了 capitalize_all 函数，它首先缩写每个标签，然后将字符串的起始字符转换为大写字母。请注意，paste、toupper、substring 和 abbreviate 内置函数用于实现 capitalize_all 功能，但对这些方法的全面回顾超出了本文的范围。可以在 r 控制台中使用 ?function_name 表示法显示手册页。
library(ggplot2)
library(gridextra)
capitalize_all <- vectorize(function(x) {
s <- abbreviate(x)
paste(toupper(substring(s, 1,1)), substring(s, 2), sep="", collapse=" ")
})
ggplot(mpg, aes(manufacturer, cty)) geom_point(aes(colour = trans))
scale_x_discrete(labels = capitalize_all)
转载请发邮件至 1244347461@qq.com 进行申请，经作者同意之后，转载请以链接形式注明出处
本文地址：
相关文章
发布时间：2024/02/05 浏览次数：207 分类：编程语言
-
本文介绍了如何交互式清除 r 控制台。
发布时间：2024/02/05 浏览次数：160 分类：编程语言
-
本文介绍如何用键盘或鼠标停止运行r代码。
发布时间：2024/02/05 浏览次数：223 分类：编程语言
-
本教程演示了如何设置 r 便携版。
发布时间：2023/03/21 浏览次数：72 分类：编程语言
-
一项常见的数据分析任务是根据同一行的其他列使用一个或多个条件创建或更新数据框列。 如果我们尝试使用 if 语句来执行此操作，则只会使用第一行来测试条件，并且会根据该行更
发布时间：2023/03/21 浏览次数：198 分类：编程语言
-
在这篇文章中，你将会了解到两个在 r 中读取 xlsx 文件的最完整和最容易使用的库：readxl 和 openxlsx。
发布时间：2023/03/21 浏览次数：371 分类：编程语言
-
在本教程中，你将学习如何在 r 中编写一个函数，在不需要重新启动 r 的情况下清除环境。
发布时间：2023/03/21 浏览次数：164 分类：编程语言
-
本教程演示了如何检查 r 的版本。
发布时间：2023/03/21 浏览次数：222 分类：编程语言
-
本教程演示了如何在 r 中创建一个空向量。
发布时间：2023/03/21 浏览次数：176 分类：编程语言
-
本教程演示了如何在 r 向量中查找元素的索引。
