central limit theorem code snippets in r

create a function for central theroem limit in r