R Codes For Distribution