Question 1: Creating a data set

For question 1, you’ll be creating a data set two different ways:

  1. Creating individual vectors, then combining them together

  2. Creating the data set without creating the vectors previously

Part 1a: Beer names

Create a vector called names that has the following five values: “Budlight”, “Fiddlehead”, “Blue Moon”, “Miller Lite”, “Modelo”. Have the vector appear below the code chunk in the knitted document

## [1] "Budlight"    "Fiddlehead"  "Blue Moon"   "Miller Lite" "Modelo"

Part 1b: Light

Create a vector called light that indicates if the beer is a light beer with the following values: TRUE, FALSE, FALSE, TRUE, FALSE. Create a table for light using table()

## light
## FALSE  TRUE 
##     3     2

Part 1c: ABV and Calories

Next, you’ll create two vectors, one named ABV and another named calories:

  • ABV: 4.2, 6.2, 5.4, 4.2, 4.4

  • calories: 110, missing, 168, 96, 144 - where missing indicates the calories aren’t known

Have both ABV and calories appear below the code chunk in the knitted document

## [1] 4.2 6.2 5.4 4.2 4.4
## [1] 110  NA 168  96 144

Part 1d: Summary Stats

Calculate the mean of the ABV and the median of the known calories

## [1] 4.88
## [1] 127

Part 1e: Forming the beer data set

Using the vectors created in parts 1a, 1b, and 1c, form a data set named beers with columns: name (not names), light, ABV, calories, in that order. Have the data set appear in the knitted document

##          name light ABV calories
## 1    Budlight  TRUE 4.2      110
## 2  Fiddlehead FALSE 6.2       NA
## 3   Blue Moon FALSE 5.4      168
## 4 Miller Lite  TRUE 4.2       96
## 5      Modelo FALSE 4.4      144

Part 1f: Forming the data set with an empty global environment

Create the same beers data set from Part 1e without adding the vectors to the global environment (i.e., don’t create a vector called names, just a column called name in the beers data set). After, calculate the average ABV using the ABV column in the beers data set

## [1] 4.88

Question 2: Beers data set

Question 2 involves the “Beer Book.csv” file, which has 340 rows and 5 columns:

Part 2a: Import the data set

Import the “Beer Book.csv” file and name it beer. Display the first 10 rows in the knitted document

##                                        Beer               Brewery        Style
## 1 Cream on the Inside, Green on the Outside            Other Half         DIPA
## 2              Spontaneous Dot - Elderberry House of Fermentology     Wild Ale
## 3                        French Toast Brown               Madison    Brown ale
## 4                                     Vliet        Threes Brewing      Pilsner
## 5                                Tmave pivo          Simple roots Dark pilsner
## 6                                Wet Dreams        Foley brothers     Pale ale
##   ABV RateBeer.Score
## 1 9.4           4.04
## 2 5.0             NA
## 3 6.5             NA
## 4 5.1           3.43
## 5 5.2           3.75
## 6 5.5           3.55

Part 2b: Load packages

Load the tidyverse and skimr packages, then skim the beer data set. Which column, if any, has the most missing values, and how many?

Data summary
Name beer
Number of rows 340
Number of columns 5
_______________________
Column type frequency:
character 3
numeric 2
________________________
Group variables None

Variable type: character

skim_variable n_missing complete_rate min max empty n_unique whitespace
Beer 0 1 0 58 1 334 0
Brewery 0 1 4 32 0 113 0
Style 0 1 3 15 0 55 0

Variable type: numeric

skim_variable n_missing complete_rate mean sd p0 p25 p50 p75 p100 hist
ABV 1 1.00 6.51 1.58 0.00 5.22 6.20 7.8 11.80 ▁▁▇▃▁
RateBeer.Score 300 0.12 3.67 0.26 3.07 3.50 3.66 3.8 4.25 ▂▃▇▃▂

The column with the most missing values is your answer here

You can ignore the code chunk below. It will make some changes to the beer data set for the remaining questions

Part 2c: Correlation between ABV and Score

Calculate the correlation between ABV and RateBeer_Score using the cor() function. Include use = "complete" to have it ignore missing values

## [1] 0.2716892

Part 2d: Calculating the proportion of styles

Using the beer data set, select(), table(), prop.table(), and round() functions along with pipes, calculate the proportion of beers of each Style, rounded to 3 decimal places.

If you need help with any of the functions you need to use, the help menu in the bottom right corner is very helpful!

## Style
##     DIPA      IPA    Lager    Other Pale Ale  Pilsner     Sour 
##    0.191    0.271    0.044    0.362    0.041    0.041    0.050

What are the 3 most common styles in the data set?