Update JM_analysis.R

remove lines related to unpublished data