Create Generating Random samples fom DIrect Method.R