In Rstudio Answer #1,2,3,4

Load the libraries.

```{r} library(tidyverse) library(broom) ```

## Problem 1 In the diamonds dataframe create the variable price per carat (ppc) and then creae a boolean variable HiValue which is true when the price per carat of a diamond is greater than the 90th percentile of this variable. Produce a table of the variable HiValue to verify that your code worked.

```{r} # Insert your code here. ```

## Problem 2 Create a logistic regression model, ppc1, with HiValue as the dependent variable. Display a summary of this model.

```{r} # Insert your code here. ```

## Problem 3 Create and display the accuracy rate and confusion matrix based on a threshold of .5.

```{r} # Insert your code here. ```

## Problem 4 Create the ROC curve for your model

```{r} # Insert your code here. ```