在R中使用plotrix包中的函数可以实现在不丢失误差条的情况下反转y轴(从正到负)。具体步骤如下:
install.packages("plotrix")
library(plotrix)
x <- c(1, 2, 3, 4, 5)
y <- c(10, 8, 6, 4, 2)
upper <- c(1, 1, 1, 1, 1)
lower <- c(0.5, 0.5, 0.5, 0.5, 0.5)
plot(x, y, ylim = c(max(y), min(y)), type = "n", ylab = "y")
arrows(x, y + upper, x, y - lower, angle = 90, code = 3, length = 0.1)
完整的代码如下:
install.packages("plotrix")
library(plotrix)
x <- c(1, 2, 3, 4, 5)
y <- c(10, 8, 6, 4, 2)
upper <- c(1, 1, 1, 1, 1)
lower <- c(0.5, 0.5, 0.5, 0.5, 0.5)
plot(x, y, ylim = c(max(y), min(y)), type = "n", ylab = "y")
arrows(x, y + upper, x, y - lower, angle = 90, code = 3, length = 0.1)
这样就可以在R中绘制出反转y轴的图形,并且保留了误差条。请注意,这里使用的是plotrix包中的函数,该包提供了许多用于绘图的功能。
领取专属 10元无门槛券
手把手带您无忧上云