library(ggplot2)
data(diamonds)
ggplot(diamonds) +
geom_point((aes(price, carat, color = color, size = clarity))) +
scale_color_discrete() +
labs(
title = "Diamanty", x = "Cena", y = "Karáty",
color = "Barva", size = "Čistota"
+
) theme_bw() +
theme(
axis.title = element_text(size = 16),
title = element_text(size = 20),
axis.text = element_text(size = 14)
)