tried (failed) to make diagplottype reactive, fixed alignments in server.R