Wczytywanie niebednych bibliotek

library(ggplot2)
## Warning: pakiet 'ggplot2' został zbudowany w wersji R 4.2.3
library(dplyr)
## 
## Dołączanie pakietu: 'dplyr'
## Następujące obiekty zostały zakryte z 'package:stats':
## 
##     filter, lag
## Następujące obiekty zostały zakryte z 'package:base':
## 
##     intersect, setdiff, setequal, union

Wczytywanie danych dotyczacych irysów

data('iris')
head(iris)
##   Sepal.Length Sepal.Width Petal.Length Petal.Width Species
## 1          5.1         3.5          1.4         0.2  setosa
## 2          4.9         3.0          1.4         0.2  setosa
## 3          4.7         3.2          1.3         0.2  setosa
## 4          4.6         3.1          1.5         0.2  setosa
## 5          5.0         3.6          1.4         0.2  setosa
## 6          5.4         3.9          1.7         0.4  setosa

Tabela długości płatków i kielichów irysów

knitr::kable(head(iris[, c("Sepal.Length", "Sepal.Width", "Petal.Length", "Petal.Width")]), 
             caption = "Tabela Długości Płatków i Kielichów Irysów")
Tabela Długości Płatków i Kielichów Irysów
Sepal.Length Sepal.Width Petal.Length Petal.Width
5.1 3.5 1.4 0.2
4.9 3.0 1.4 0.2
4.7 3.2 1.3 0.2
4.6 3.1 1.5 0.2
5.0 3.6 1.4 0.2
5.4 3.9 1.7 0.4

Podsumowanie długości płatków irysów

summary(iris$Petal.Length)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   1.000   1.600   4.350   3.758   5.100   6.900

Wykres histogramu rozkładu długości płatków irysów

ggplot(iris, aes(x = Petal.Length)) +
  geom_histogram(binwidth = 0.2, fill = "skyblue", color = "black") +
  labs(title = "Rozkład długości płatków irysów",
       x = "Długość płatka",
       y = "Liczba irysów")

Wykres punktowy przedstawiający korelację między długością płatka a szerokością płatka irysa

ggplot(iris, aes(x = Petal.Length, y = Petal.Width)) +
  geom_point(alpha = 0.5, color = "darkred") +
  labs(title = "Korelacja między długością a szerokością płatka irysa",
       x = "Długość płatka",
       y = "Szerokość płatka")

Wykres pudełkowy przedstawiający rozkład długości płatków irysów w zależności od gatunku

ggplot(iris, aes(x = Species, y = Petal.Length, fill = Species)) +
  geom_boxplot() +
  labs(title = "Rozkład długości płatków irysów w zależności od gatunku",
       x = "Gatunek",
       y = "Długość płatka")

Wykres punktowy z podziałem na gatunki

ggplot(iris, aes(x = Petal.Length, y = Petal.Width, color = Species)) +
  geom_point() +
  labs(title = "Długość i szerokość płatków irysów z podziałem na gatunki",
       x = "Długość płatka",
       y = "Szerokość płatka")