Commented out code that wasn't working properly.

Should be less distracting now, esp. if I want to source the file from
Mark_analysis.r

Seem to be missing a few fxns. Find? Delete?