mydata <- data.frame("ID" = c(1, 2, 3), "Age" = c(22, 25, 27), "Gender" = c(1, 2, 2))


print(mydata) #showing the object mydata
##   ID Age Gender
## 1  1  22      1
## 2  2  25      2
## 3  3  27      2
#use to knit to html

we sampled 3 students. The age of students was between 22 and 27, there was one male and 1 female.