R循环嵌套生成多批数据：错误: 意外的'}'在"}"里

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

S=20

N=500

C=3

J=12

LCProb=N/3

RT=5

RespProb=0.7

p.x=0.8

varJX = matrix(,N,J)

LC= matrix(,N,1)

X=matrix(,N,1)

for(s in 1:S){

for(a in 1:J){

for(i in 1:N){

if(i <=LCProb){

LC=1

varJX[i,a]<-sample(c(1,2,3,4,5),size=1,replace=T,prob=c(0.8,0.05,0.05,0.05,0.05))

X<-sample(c(0,1),size=1,replace=T,prob= c(0.9,0.1))

}else{

if(i <= 2* LCProb){

LC=2

varJX[i,a]<-sample(c(1,2,3,4,5),size=1,replace=T,prob=c(0.05,0.8,0.05,0.05,0.05))

X<-sample(c(0,1),size=1,replace=T,prob= c(0.7,0.3))

}else{

LC=3

varJX[i,a]<-sample(c(1,2,3,4,5),size=1,replace=T,prob= c(0.05,0.05,0.8,0.05,0.05))

X<-sample(c(0,1),size=1,replace=T,prob= c(0.5,0.5))

}

}

}

}

varJX＝result

d <- data.frame(varJX,X)

sim <- paste("sim", s, ".txt",sep = "")

write.table(d, file = sim,row.names=F)

}这是我的代码，想生成20批随机数据，但是多加了一个循环语句就出错了。求大神指点！

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：matrix resp Mat For Rob matrix

1、varJX＝result
这句里面的等号＝不知道你怎么打出来的，你删掉重新打一个就解决了
2、改掉等号之后还会报错，因为你那个result不知道哪里冒出来的
3、这种非学术讨论的问题其实应该设悬赏的，不管是不是大神，看这么一大段大括号也是费神，如果解决了你的疑问了，我觉得应该在右下角评分里给一两个论坛币，大家都只做伸手党那就没意思了

千5320 发表于 2016-9-5 03:05
1、varJX＝result
这句里面的等号＝不知道你怎么打出来的，你删掉重新打一个就解决了
2、改掉等号之后还会 ...

额，第一次发帖，不太懂呢，刚来论坛没多久，问题解决了谢啦!!☆⌒(*＾-゜)v

千5320 发表于 2016-9-5 03:05
1、varJX＝result
这句里面的等号＝不知道你怎么打出来的，你删掉重新打一个就解决了
2、改掉等号之后还会 ...

怎么给币呀，= =，评分那里好像只有评分呀

评分里第一行就是呀，在学术水平上面，不会也没关系。以后问了问题，有人回答好的话评个分，大家也有积极性。每天签到的经验可以换论坛币的

千5320 发表于 2016-9-5 17:55
评分里第一行就是呀，在学术水平上面，不会也没关系。以后问了问题，有人回答好的话评个分，大家也有积极性 ...

我的是这样的= =

看到这种嵌套for循环的就头疼 只想来吐槽