added R plot for cell locations
corrected an error in the joint distribution formula