在 R 中创建 Y 轴反转、X 轴在顶部的 ggplot2 图形。
r programmingserver side programmingprogramming
要创建 Y 轴反转、X 轴在顶部的 ggplot2 图形，我们可以使用 ggplot2 包的 scale_y_reverse 和 scale_x_continuous 函数。
例如，如果我们有一个名为 df 的数据框，其中包含两列，即 X 和 Y，并且我们想要在 X 和 Y 之间创建 Y 轴反转、X 轴在顶部的散点图，那么我们可以使用以下命令 −
ggplot(df,aes(X,Y))+geom_point()+scale_y_reverse()+scale_x_continuous(position="top")
示例
以下代码片段创建了一个示例数据框−
x<-rnorm(20) y<-rnorm(20) df<-data.frame(x,y) df
创建以下数据框
x y
1 0.59312447 0.4993337
2 0.08696615 -0.1242276
3 1.11337560 -0.5706901
4 0.01421750 0.3663344
5 -0.84509560 0.4541131
6 -0.65373363 0.9613303
7 -0.35945721 -0.1857298
8 0.59160684 0.3575833
9 -1.26637220 -1.1135318
10 0.38272955 0.8173167
11 0.06691834 0.3234260
12 0.16622601 1.2409558
13 0.46761776 -0.9447498
14 1.58349520 -0.4018503
15 0.58928505 -2.6192820
16 0.36153663 2.1236007
17 0.53978229 -0.5937517
18 -1.03483870 1.0795689
19 -1.17331809 -1.0425776
20 -1.12299141 -0.7738698
要加载 ggplot2 包并在上面创建的数据框上创建 x 和 y 之间的散点图，请将以下代码添加到上面的代码片段 −
x<-rnorm(20) y<-rnorm(20) df<-data.frame(x,y) library(ggplot2) ggplot(df,aes(x,y))+geom_point()
输出
如果将上面给出的所有代码片段作为单个程序执行，它将生成以下输出 −
要在上面创建的数据框中创建 x 和 y 之间的散点图，其中 Y 轴反转，X 轴在顶部，请将以下代码添加到上面的代码片段 −
x<-rnorm(20) y<-rnorm(20) df<-data.frame(x,y) library(ggplot2) ggplot(df,aes(x,y))+geom_point()+scale_y_reverse()+scale_x_continuous(position="top")
输出
如果将上述所有代码片段作为单个程序执行，则会生成以下输出 −
