/*** generating random variables***/ set seed 19560713 set obs 1000 gen my= invnorm(uniform()) gen rx=uniform() gen lx=uniform() /***Summary statistics***/ sum my rx lx /***Graph***/ histogram my histogram rx histogram lx /***Random Walk ***/ gen rpos=rx+rx[_n-1] gen lpos=lx+lx[_n-1] line rpos lpos