# Import data
library(tidyverse)
granola <- read_csv(file = "https://raw.githubusercontent.com/zief0002/epsy-5261/main/data/granola.csv")granola.csv
The granola.csv data include information on \(n=31\) granola bars that were randomly sampled to evaluate quality control.
The attributes included in the data are:
protein: The measured protein (in grams) in the granola bar