希望编写一个函数，名字为randunif，里面有n,r,maxi,mini这四个参数，最终希望生成一个矩阵，n行r列，每一个元素是均匀分布的，最大值为maxi，最小值为mini，以下是鄙人编写的代码，不知道为何总是出错。谢谢大家了。
randunif<-function(n,r,maxi,mini)
{nrow<-n, ncol<-r, min<-mini, max<-maxi, matrix(runif(r*n,min,max),ncol,nrow)}