#r.rNorm<-function (n, mean = 0, sd = 1){.External(C_rnorm, n, mean, sd)} #r.rNorm(10) #Error in r.rNorm(10) : object 'C_rnorm' not found r.rNorm<-function (n, mean = 0, sd = 1) {rnorm(n, mean=mean, sd=sd)}