##Vector processing=group
##Layer = vector
##showplots
##Field=Field Layer
dotchart(Layer[[Field]],main=paste("Dotplot of",Field),xlab=paste(Field),ylab="Observation number")