people<-read.delim2("clipboard") people<-read.csv2("01_data.csv", sep=";") # imports the people dataset from clipboard into people dataframe summary(people)#diplays summary of the people dataframe class(people)# shows object type of people median(people$height) min(people$height) range(people$height) mean(people$height) quantile(people$height)# computes quantiles of height values males<-people[people$sex=="M",]# Creates a new dataframe containing just data on males median(people$height[people$sex=="M"]) median(people$height[people$sex=="F"]) aggregate(people$height, list(people$sex), median)#computes aggregated meadian height values for males and females tapply(people$height, list(people$sex), median)# the same with different output format hist(people$height)#Plots histogram of heights boxplot(height~sex, data=people)#Plots a boxplot showing association between sex and heights