sheet1 <- read.table("sheet-example1.csv", sep = ",", header = TRUE)
View(sheet1)