---
title: "Exercises 11.3, 11.19"
author: ""
date: ""
output: 
  html_document:
    fig_height: 3
    fig_width: 5
  pdf_document:
    fig_height: 3
    fig_width: 5
  word_document:
    fig_height: 3
    fig_width: 5
---

```{r, setup, include=FALSE}
require(mosaic)   # Load additional packages here 

# Some customization.  You can alter or delete as desired (if you know what you are doing).
trellis.par.set(theme=theme.mosaic()) # change default color scheme for lattice
knitr::opts_chunk$set(
  tidy=FALSE,     # display code as typed
  size="small")   # slightly smaller font for code
```

## Exercise 11.3 and 11.19 (c)

Import data set for Exercise 11.3:
```{r}
chemical <- read.table("https://asta.math.aau.dk/datasets?file=chemical.txt", header = TRUE)
head(chemical)
```

You should answer the exercise by an analysis in RStudio.



