为什么这个程勋运行不出来？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

huyanqing=function(n,l,d,m){
k=1;i=1;o=1;y=matrix(NA,10,500);B=NULL
x=c(runif(n))            
for(k in 1:l){               
s=c(rnorm(n))   
y[,k]=x+s  
k=k+1  
}
for(o in 1:d){
for(i in 1:m){
X2=sample(1:500,1,replace=TRUE)
A=matrix(NA,10,2)
A[,i]=y[,X2]
i=i+1
}
lm.reg<-lm(A[,1]~A[,2])
U=summary(lm.reg)$coefficients[2, 3]
B=c(B,U)
o=o+1
}
quantile(B,c(0.1,0.5,99.5)/100)
}

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：function replace matrix Sample place function replace matrix

你这只是一个函数，运行当然没有东西了。

qoiqpwqr 发表于 2013-12-16 18:09
你这只是一个函数，运行当然没有东西了。

我是觉得他这个函数编写的太有问题了

function(x)后面要跟一个输出吧
比如
arg <- function(x) {}
arg(smp)