Below are the instructions to R that produced these two dotplots.

f=c(47,12,3,2,1); n=c(1,2,3,5,12) vole=rep(n,f) # reconstruct orig. data wta=c(445,530,540,510,570,530,545,545,505,535,450,500,520,460,430,520,520,430,535,535,475,545,420,495,485,570,480,495,470,490) par(xaxt='n',mfrow=c(1,2)) # set plot defaults plot(rank(vole,ties.method='first')-rank(vole,ties.method='average'), vole, xlab='', ylab='Breeding females / colony', pch='+', col='darkgreen') plot(rank(wta,ties.method='first')-rank(wta,ties.method='average'), wta, xlab='', ylab='Cattle weight', pch='+', col='darkgreen') par(xaxt='s',mfrow=c(1,1)) # reset plot default