# 8-2 Exercise 1

# Create component vectors

names<-c("Alice","Bob","Charlotte","Dave","Eve","Frank")
essay<-c(36,78,58,56,69,48)
exam<-c(42,83,67,17,88,53)

# Build data frame from the component vectors

module<-data.frame(names,essay,exam)

# Display data frame

module

# Display the names

module$names

# Display the exam marks

module$exam

# Display Dave's results

module[4,]