Workshop 4

#Loading necessary packages from Workshop 1

#Excercise 1.4.3 | Question #4

ggplot(diamonds, aes(x = carat)) +
  geom_histogram(binwidth = 0.01) 

#Exercise 1.2.5 | Question #3

  ggplot(penguins, aes(x = bill_length_mm, y = bill_depth_mm)) +
  geom_point(aes(color = species, shape = species)) +
  facet_wrap(~species)

## Warning: Removed 2 rows containing missing values or values outside the scale range
## (`geom_point()`).