R markdown practice with code chunks

ggplot(data = penguins) +

  geom_point(mapping = aes(x = flipper_length_mm, y = body_mass_g,color=species))

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