# Artificial data:
#
# hwc.txt was made like (commands repeated until sd was around 3):
# sd(VES.BR <- round(rnorm(30, mean=mean(70:90), sd=3)))
# sd(VES.BL <- round(rnorm(30, mean=mean(69:79), sd=3)))
# sd(VES.SH <- round(rnorm(30, mean=mean(70:80), sd=3)))
# sd(ROST.BR <- round(rnorm(30, mean=mean(160:180), sd=3)))
# sd(ROST.BL <- round(rnorm(30, mean=mean(155:160), sd=3)))
# sd(ROST.SH <- round(rnorm(30, mean=mean(160:170), sd=3)))
# data.frame(COLOR=rep(c("black", "blond", "brown"), each=30), WEIGHT=c(VES.BR, VES.BL, VES.SH), HEIGHT=c(ROST.BR, ROST.BL, ROST.SH))
#
# hwc2.txt similar but sd was not controlled therefore it is not homogeneous
#
# hwc3 was made like
# set.seed(1683)
# VES.BR <- sample(70:90, 30, replace=TRUE)
# VES.BL <- sample(69:79, 30, replace=TRUE)
# VES.SH <- sample(70:80, 30, replace=TRUE)
# ROST.BR <- sample(160:180, 30, replace=TRUE)
# ROST.BL <- sample(155:160, 30, replace=TRUE)
# ROST.SH <- sample(160:170, 30, replace=TRUE)
# data.frame(COLOR=rep(c("black", "blond", "brown"), each=30), WEIGHT=c(VES.BR, VES.BL, VES.SH), HEIGHT=c(ROST.BR, ROST.BL, ROST.SH))
#
COLOR	hair color
WEIGHT	weight, kg
HEIGHT	height, cm