# Loading libraries and bird dataset 
library(e1071)
library(MASS)
setwd("~/Desktop/...") # Don't forget to set your working directory (note: your directory will be different)
bird<-read.csv("birdsdiet.csv") 

# Visualize the dataframe
names(bird)
str(bird)
head(bird)
summary(bird) 
plot(bird)