for putting code of R learning