###
---
title: " Lab Report 2 - z5016113"
output: html_notebook
i---

#1. Gastropod abundance vs. height on the shore

```{r}
Gastropods <- read.csv(file = "MaroubraZones.csv", header = TRUE)
library(ggplot2, dplyr)
```

```{r}
Gastropods$Zone <- factor(Gastropods$Zone, levels = c("Low", "Mid", "High"))
```

```{r}
Cellana <- filter(Gastropods, Species == "Cellana")  ------> This line is causing the error
```

```{r}
ggplot(Cellana, aes(Zone, Abundance)) + geom_boxplot()
```
###