Is there a function in R that generates random variables

Let X~X^2(10) and Y~t(5) Write a function in R that: generates 500 random variables of X and Y Computes the mean of Y/X Calls the function above 1000 times and stores the means in a vector called our means