Wheatears

For this problem, we will work with the black whentears data from the s$1$eath $3$ package. For each mating

sason, the bleck wheatear birds will gatber steees for their nests. The hypothesis is that houlther bixds

will gather mote stonen. The variables ixctede:

Kass: average mass of stones carried by bird $($in g$)$

Tcell: T$-$cell response mesasurement $($in min$)$

You can acoes these data by runing the following in R:

$11$ brary $($ctidyerse$)$

$1$ ibrary $($Sleuth$3)$

data $("$ex$0727")$

wheat &$-$ ex$0727$

glinpse $($wheat$)$

Af Hows: $2$ :

Af Colunns: $2$

A$*$ $ Tcel$1$b $1>0\mathrm{.}252,0\mathrm{.}263,0\mathrm{.}251,0\mathrm{.}251,0\mathrm{.}183,0\mathrm{.}213,0\mathrm{.}332,0\mathrm{.}203,0\mathrm{.}252,0-$

We will fit a regression of Kasa ce Tcell by ranaing the followiag is $ft$ :

lnout In$($Mass $-$ Tcell, data $=$ wheat$)$

ggplot $($wheat$,$ Tcell, $y=$ Mass