---
title: "STAT 22000 Midterm Part 2"
author: "Your Name Goes Here"
fontsize: 12pt
output:
  pdf_document: default
  html_document:
    df_print: paged
  word_document: default
header-includes: \usepackage{pdfpages}
geometry: margin=0.75in
fig_crop: no
---

```{r echo=FALSE, message=FALSE}
library(knitr)
knitr::opts_chunk$set(fig.width=4, fig.height=3, message=F, warning=F)
options(scipen=6, digits=6)
```

# Question 1 --- Party or Gym


## Q1a --- 3 points



## Q1b --- 3 points



## Q1c --- 3 points



# Question 2


## Q2a --- 2 points


## Q2b --- 3 points


## Q2c --- 3 points


## Q2d --- 4 points



# Question 3 


## Q3a --- 4 points


## Q3b --- 4 points



# Question 4 --- Raisins in the Muffin

$$
\begin{array}{r|cccc}
X & 3 & 4 & 5 & 6\\\hline
P(X) & 0.2 & 0.2 & 0.4 & 0.2
\end{array}
$$



## Q4a --- 5 points


## Q4b --- 5 points



# Question 5 --- GRE


## Q5a --- 3 points


## Q5b --- 3 points


# Question 6 --- 5 points


```{r}
soybean = read.table("https://www.stat.uchicago.edu/~yibi/s222/Soybean.txt",h=T)
```