功能/循環錯誤

Question

這是我的代碼和我發現了以下錯誤：

錯誤數據[1] = RNORM（N，M，SD）： 數項替換的不是多的替換長度

不知道我在做什麼錯。
我需要雙循環它現在，基本上我需要改變k爲2和3和n爲10和15。我知道我需要創建一個函數，創建第二個矩陣，爲代碼中的1：k添加爲...我試圖添加所有，但不知道如何去做。

library(fGarch) 

#n reps =10 
rep=10 

#begin function here, need to vary n and k, when k=2 n=10, when k3 n=15 
fun=function(n, k, m, sd, sk){ 

#prepare to store data 
data=matrix(0,nrow=k, ncol=3) 
db=matrix(0,nrow=rep, ncol=3) 
final=NULL 
for (j in 1:rep) 
{ 
    for (i in 1:k) 
    { 
#generate data under normal, skewed, and logistic distributions here  
    data[,1]=rnorm(n, m, sd) 
    data[,2]=rsnorm(n, m, sd, sk) 
    data[,3]=rlogis(n, m, sd) 
} 
final[j]=db 
} 
} 

Answer 1

你有一些錯別字和括號的問題。下面的代碼工作：

library(fGarch) 

rep=10 
data=matrix(0,nrow=10*rep, ncol=3) 

for (i in 1:rep){ 
    data[(10*(i-1)+1):(10*i),1]<-rnorm(10, 100, 15) 
    data[(10*(i-1)+1):(10*i),2]<-rsnorm(10, 100, 15,1) 
    data[(10*(i-1)+1):(10*i),3]<-rlogis(10, 100, 15) 
} 

注意的另外一組括號中data[(10*(i-1)+1):(10*i),1]值得注意的是，這裏一個for循環是完全沒有必要的，而且非常不-R類似，即可能導致R中的壞習慣。同樣的結果可以用：

data[,1]<-rnorm(10*rep, 100, 15) 
data[,2]<-rsnorm(10*rep, 100, 15, 1) 
data[,3]<-rlogis(10*rep, 100, 15) 

編輯：現在更新。再試一次