figure for RSweave

no other changes - to work on at home