Add a title using the ggtitle() layer:
ggplot(data=geneexp, mapping=aes(x=WT1, y=WT2)) + geom_point(color="red", size=2.5, shape="diamond") + ggtitle(label="my first ggplot")
label is a parameter of ggtitle() function.