Як побудувати кілька ліній (рядів даних) на одній діаграмі в r
У цьому посібнику пояснюється, як побудувати кілька ліній (тобто рядів даних) на одній діаграмі в R.
Щоб побудувати кілька ліній на графіку, ми можемо використовувати базовий R або встановити більш складний пакет, як-от ggplot2.
Використання BaseR
Ось два приклади того, як побудувати кілька ліній на одному графіку за допомогою Base R.
Приклад 1: Використання Matplot
Якщо у вас є набір даних великого формату , простий спосіб побудувати кілька ліній на графіку — це використовувати matplot:
#Create a fake dataset with 3 columns (ncol=3) composed of randomly generated #numbers from a uniform distribution with minimum = 1 and maximum = 10 data <- matrix(runif(30,1,10), ncol=3) data [,1] [,2] [,3] #[1,] 5.371653 3.490919 3.953603 #[2,] 9.551883 2.681054 9.506765 #[3,] 3.525686 1.027758 8.059011 #[4,] 9.923080 1.337935 1.112361 #[5,] 7.273972 7.627546 1.174340 #[6,] 8.859109 3.778144 9.384526 #[7,] 9.614542 3.866029 7.301729 #[8,] 9.288085 5.804041 8.347907 #[9,] 1.696849 4.650687 7.220209 #[10,] 5.820941 4.799682 5.243663 #plot the three columns of the dataset as three lines and add a legend in #the top right corner of the chart matplot(data, type = "b",pch=1,col = 1:3) legend("topright", legend = 1:3, col=1:3, pch=1)
Цей код створює такий графік:
Приклад 2: Використання точок і ліній
Ще один спосіб намалювати кілька ліній — це намалювати їх по черзі за допомогою вбудованих функцій R points() і lines(). Код нижче показує приклад цього підходу:
#generate an x-axis along with three data series x <- c(1,2,3,4,5,6) y1 <- c(2,4,7,9,12,19) y2 <- c(1,5,9,8,9,13) y3 <- c(3,6,12,14,17,15) #plot the first data series using plot() plot(x, y1, type="o", col="blue", pch="o", ylab="y", lty=1) #add second data series to the same chart using points() and lines() points(x, y2, col="red", pch="*") lines(x, y2, col="red",lty=2) #add third data series to the same chart using points() and lines() points(x, y3, col="dark red",pch="+") lines(x, y3, col="dark red", lty=3) #add a legend in top left corner of chart at (x, y) coordinates = (1, 19) legend(1,19,legend=c("y1","y2","y3"), col=c("blue","red","black"), pch=c("o","*","+"),lty=c(1,2,3), ncol=1)
Цей код створює такий графік:
Використання ggplot2
Ось приклад того, як побудувати кілька ліній на одному графіку за допомогою ggplot2.
#install (if not already installed) and load ggplot2 package if(!require(ggplot2)){install.packages(' ggplot2 ')} #generate fake dataset with three columns 'x', 'value', and 'variable' data <- data. frame (x=rep(1:5, 3), value=sample(1:100, 15), variable=rep(paste0(' series ', 1:3), each=5)) #view dataset head(data) x value variable 1 1 93 series1 2 2 64 series1 3 3 36 series1 4 4 17 series1 5 5 95 series1 6 1 80 series2 #plot all three series on the same chart using geom_line() ggplot(data = data, aes(x=x, y=value)) + geom_line(aes(color=variable))
Це генерує такий графік:
Додаткові ресурси
У наступних посібниках пояснюється, як виконувати інші поширені операції побудови в ggplot2:
Як змінити положення легенди в ggplot2
Як змінити назву легенди в ggplot2
Як змінити поля в ggplot2