ggplot(mtcars, aes(x = wt, y = mpg)) + geom_line() + ggtitle(“Линейный график: Вес автомобиля vs. MPG”)
ggplot(mpg, aes(x = class, y = hwy)) + geom_boxplot() + ggtitle(“Боксплот: Класс автомобиля vs. Highway MPG”)
ggplot(diamonds, aes(x = carat)) + geom_histogram(binwidth = 0.1) + ggtitle(“Гистограмма: Распределение веса бриллиантов”)
ggplot(economics, aes(x = date, y = unemploy)) + geom_area(fill = “lightblue”) + ggtitle(“Диаграмма с областями: Уровень безработицы”)
ggplot(diamonds, aes(x = cut)) + geom_bar() + coord_flip() + ggtitle(“Перевернутый барчарт: Качество огранки бриллиантов”)
ggplot(diamonds, aes(x = factor(1), fill = cut)) + geom_bar(width = 1) + coord_polar(theta = “y”) + ggtitle(“Полярная диаграмма: Качество огранки бриллиантов”)