plot4.R complete

still need to update the codebook and readme.