Create a data frame of 10 students’ names, subject and marks.

# Create data frame of students' information
students <- data.frame(
  Name = c("John", "Emily", "Michael", "Sophia", "Daniel", "Olivia", "William", "Ava", "James", "Isabella"),
  Subject = rep(c("Math", "Science", "English"), each = 10),
  Marks = sample(60:100, 30, replace = TRUE)  # Generating random marks for demonstration
)
 # View the data frame
View(students)
 # Display summary statistics for subjects and marks
summary(students$Subject)
summary(students$Marks)
 # Plot boxplot for subjects
boxplot(Marks ~ Subject, data = students, main = "Boxplot of Marks by Subject", xlab = "Subject", ylab = "Marks")