STA 100 - HW 2

setwd(“C:”) library(ggplot2)

Problem I

(a)

echo = TRUE # make sure we have ggplot2 library(ggplot2)

pulling data from the colors.csv file

colors_data <- read.csv(“C:/Users/gaura/Downloads/colors.csv”)

plotting the barplot

ggplot(colors_data, aes(x = Eye)) + geom_bar(fill = “blue”) + labs(title = “Eye Color Distribution”, x = “Eye Color”, y = “Frequency”)

(b)

(c)

(d)

Problem II

(a)

(b)

(c)

(d)

R Code Appendix (will automatically list all code used)