【已解决】非常用R模拟生成（0,1）随机数计算积分过程中if语句有问题，请问有谁可以帮

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

非常感谢帮忙的人！ｍ<(＿　＿)>ｍ

程序如下：
u=runif(1000)
v=runif(1000)
if v<=u  y==0
else y==1
s=sum(y*exp(-((1/u)+(1/v)-2))*(1/(u*v)^2))/1000
s


显示结果如下：（就是错误的地方不知道如何改……）
> u=runif(1000)
> v=runif(1000)
>
> if v<=u  y==0
错误: 意外的符号在"if v"里
>
> else y==1
错误: 意外的'else'在"else"里
> s=sum(y*exp(-((1/u)+(1/v)-2))*(1/(u*v)^2))/1000
> s
[1] 0.503547

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：随机数 已解决 else 非常感谢 Run 积分 计算

我没学过R语言，但是，据我对某些语言的了解（抱歉，基本是瞎猜），可能可以考虑检查：
- 可能if后面要有（），即 if（。。。）。。。
- 你的那两句中有，y==0  y==1。但这些语句似乎是比较语句，不是赋值语句，而你似乎想赋值。所以，可能也是错误原因

TaskShare 发表于 2012-12-9 22:40
我没学过R语言，但是，据我对某些语言的了解（抱歉，基本是瞎猜），可能可以考虑检查：
- 可能if后面要有（ ...

正解! 还有就是if后面的判断语句要加括号if (....)

TaskShare 发表于 2012-12-9 22:40
我没学过R语言，但是，据我对某些语言的了解（抱歉，基本是瞎猜），可能可以考虑检查：
- 可能if后面要有（ ...

谢谢你啦

qoiqpwqr 发表于 2012-12-10 00:57
正解! 还有就是if后面的判断语句要加括号if (....)

但是我改成下面这样子还是有错。说是长度出了问题，是不是u,v个包含1000个数，所以下面的用期望求积分的式子不能进行呢？难道需要把每个u,v后加上？谢谢

u=runif(1000)
v=runif(1000)
if(v<=u){
y=0}else{
y=1}
s=sum(y*exp(-((1/u)+(1/v)-2))*(1/(u*v)^2))/1000
s

eliza943 发表于 2012-12-10 20:56
但是我改成下面这样子还是有错。说是长度出了问题，是不是u,v个包含1000个数，所以下面的用期望求积分的式 ...

貌似这样就可以吧：
u=runif(1000)
v=runif(1000)
y=as.numeric(v>u)
s=sum(y*exp(-((1/u)+(1/v)-2))*(1/(u*v)^2))/1000
s

u=runif(1000)
v=runif(1000)
y[v<=u] =0
y[v>u]=1
s=sum(y*exp(-((1/u)+(1/v)-2))*(1/(u*v)^2))/1000
s

jmpamao 发表于 2012-12-10 21:50
u=runif(1000)
v=runif(1000)
y[vu]=1

非常感谢你o<(=*￣▽￣*=)>ゞ

kaifengedu 发表于 2012-12-10 21:39
貌似这样就可以吧：
u=runif(1000)
v=runif(1000)

谢谢O(∩_∩)O。我还想问一下，y的赋值那个不是格式转换吗？在你写的程序里是什么意思呢？

他的意思 是 逻辑 F为0， T为1

如果要 y=2 那就不行了