I added library(reshape) before running melt. ``` R library(reshape) from.weight <- melt(with(priority.train, table(From.EMail)), value.name="Freq") ``` Then melt fn worked.