load library(reshape2)