如何在 R 中为图形着色?
在本文中,我们将研究在 R 编程语言中为图形着色的各种方法。
方法 1:使用多边形函数对图形进行着色:
在此方法中,我们调用多边形函数,其参数 col 传递给定图形中需要着色的颜色的名称或十六进制代码。
多边形函数:
它用于在现有绘图中的指定点之间绘制多边形。
Syntax: polygon(x_coordinates, y_coordinates,col)
Parameters :
- x_coordinates, y_coordinates: x, y coordinates of plot to draw polygon
- col: Color to the polygon
Returns: a polygon in a given plotParameters;
例子:
在本例中,我们将创建一个随机折线图,然后使用多边形函数参数 col,将创建的图形的颜色指定为绿色。
R
# data
x<-c(2,4,4,2)
y<-c(2,2,4,4)
plot(x, y, type = "l")
# Polygon
polygon(x, y, col = "green")
R
# Grid of X-axis values
x <- seq(0, 10, 0.01)
# Data
y1 <- sin(x) + 8
y2 <- 2* sin(x) + 4
# Lines
plot(x, y1, type = "l", ylim = c(1, 10), ylab = "y")
lines(x, y2, col = 2)
# Fill area between lines
polygon(c(x, rev(x)), c(y2, rev(y1)),
col = "darkgreen")
R
# Grid of X-axis values
x <- seq(0, 10, 0.01)
# Data
y1 <- sin(x) + 8
y2 <- 2* sin(x) + 4
# Lines
plot(x, y1, type = "l", ylim = c(1, 10), ylab = "y")
lines(x, y2, col = 2)
# Fill area between lines
polygon(c(x, rev(x)), c(y2, rev(y1)),
col = "darkgreen",density = 10, angle = 45)
输出:
方法 2:对两条线之间的区域进行着色
在这个方法中,我们使用了带有 col 参数的多边形函数,在这里,不同之处在于给定图形的形状,其余的都与前面的方法相似。
例子:
在此示例中,我们将创建两个 sin函数线图,在这些线图之间,我们将使用多边形函数将颜色填充为绿色,并将 col 指定为绿色作为参数。
R
# Grid of X-axis values
x <- seq(0, 10, 0.01)
# Data
y1 <- sin(x) + 8
y2 <- 2* sin(x) + 4
# Lines
plot(x, y1, type = "l", ylim = c(1, 10), ylab = "y")
lines(x, y2, col = 2)
# Fill area between lines
polygon(c(x, rev(x)), c(y2, rev(y1)),
col = "darkgreen")
输出:
方法3:用阴影线对区域进行阴影处理
在这种方法下,我们使用多边形函数的密度和角度参数,其中密度负责每单位面积的线数和绘制线的角度。
例子:
在这个例子中,我们正在创建一个矩形 t 形状的线图,并使用多边形函数的密度和角度参数,我们在线矩形图中绘制一条绿色线。
R
# Grid of X-axis values
x <- seq(0, 10, 0.01)
# Data
y1 <- sin(x) + 8
y2 <- 2* sin(x) + 4
# Lines
plot(x, y1, type = "l", ylim = c(1, 10), ylab = "y")
lines(x, y2, col = 2)
# Fill area between lines
polygon(c(x, rev(x)), c(y2, rev(y1)),
col = "darkgreen",density = 10, angle = 45)
输出: