people<-read.delim2("clipboard")
# Importing data into R via clipboard
people<-read.csv("data1.csv", sep=";")

summary(people)
class(people)
class(people$eye.color)
class(people$height)
people$eye.color
quantile(people$height)
quantile(people$height)[3]
males<-people[people$sex=="M", ]
tapply(people$height, people$sex, median)

hist(people$height)
boxplot(people$height~people$sex)