Как заштриховать график в 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")

Выход:

Метод 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)

Выход: