세로형
Wide to Long 2
dat <- read.table(header=T, text=' name height.t1 weight.t1 height.t2 weight.t2 height.t3 weight.t3 Sohn 158 49 166 56 170 60 Mija 155 44 160…