```r
larvae<-read.csv("/home/msc_scripts/data/larvae.csv")
names(larvae)
```

```
## [1] "growth" "tannin"
```

```r
attach(larvae)
plot(growth~tannin)
```

<img src="Quantitative_and_Spatial_files/figure-html/unnamed-chunk-100-1.png" width="672" />