Scatterplot & Histogram in RStudio

setwd("C:\\Users\\derek\\OneDrive\\Documents\\DDMA")
colortaste_data<-read.csv('colortaste.csv')
head(colortaste_data)

##   X  color taste weight size eaten
## 1 1    red sweet    1.5  5.7 FALSE
## 2 2   blue  sour    1.6  6.8  TRUE
## 3 3  green  sour    1.7  6.2 FALSE
## 4 4 orange salty    1.5  5.6 FALSE
## 5 5 purple salty    1.7  5.9 FALSE
## 6 6 orange salty    1.6  5.4  TRUE

# Scatterplot of Size vs Weight
plot(colortaste_data$size,colortaste_data$weight,
     xlab='size',ylab='weight',
     main='scatteplot of size against weight')

head(colortaste_data,6)

##   X  color taste weight size eaten
## 1 1    red sweet    1.5  5.7 FALSE
## 2 2   blue  sour    1.6  6.8  TRUE
## 3 3  green  sour    1.7  6.2 FALSE
## 4 4 orange salty    1.5  5.6 FALSE
## 5 5 purple salty    1.7  5.9 FALSE
## 6 6 orange salty    1.6  5.4  TRUE

#histogram
hist(colortaste_data$weight,
     xlab = 'weight',ylab='frequency',
     main = 'histogram of weiight frequency')