Update InfoSaniR_Extraction.R

Some comments