Justinus Kerner, Oberamtsarzt in Weinsberg, Dichter