--	r method now works find for all input including in1M
--	r method now works find for all input including in1M