add function gene.edit in server.R to allow editing existing gene information