summary(penguins)
ggplot(penguins, aes(x = species, fill = sex)) + geom_bar(position = “dodge”) + labs(title = “Jumlah Penguin per Spesies dan Jenis Kelamin”, x = “Spesies”, fill = “Jenis Kelamin”)
plot(pressure)