added library(MASS) to server.R so cats data available