3.29 Wykres słupkowy
# Rysowanie wykresu słupkowego z użyciem języka R
::opts_chunk$set(fig.width=4, fig.height=4) # Ustawienia wyświetlania
knitrlibrary(ggplot2) # Ładowanie pakietu funkcji
= data.frame( x = c(1,1,5,5,5,5,5,3,3,3,3,4,4,5) ) # Wektor danych
data <- ggplot(data = data) + geom_bar( aes(x = x), stat = "count" ) # Funkcja pakietu ggplot2 tworząca wykres słupkowy barplot