免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
1234
最近访问板块 发新帖
楼主: chengchow
打印 上一主题 下一主题

[数值计算] 随机数问题 [复制链接]

论坛徽章:
24
申猴
日期:2014-10-10 15:56:39射手座
日期:2014-10-10 15:57:18黑曼巴
日期:2018-05-14 11:05:122016科比退役纪念章
日期:2018-05-14 11:05:0715-16赛季CBA联赛之北控
日期:2018-05-14 11:05:0015-16赛季CBA联赛之江苏
日期:2017-02-27 18:11:0715-16赛季CBA联赛之上海
日期:2018-08-15 09:48:5415-16赛季CBA联赛之佛山
日期:2018-07-20 17:14:2315-16赛季CBA联赛之佛山
日期:2019-09-10 18:08:4615-16赛季CBA联赛之山西
日期:2020-03-26 09:40:5115-16赛季CBA联赛之佛山
日期:2020-05-08 09:03:54
31 [报告]
发表于 2014-07-30 12:28 |只看该作者
借两位高手的思路,终于给鼓捣出来了
#!/bin/bash
count=10000
total=0

for ((i=1;i<=$count;i++))
do
    ball=(`seq 1 20`)
    m=0
    arr=20
    for ((a=1;a<=10;a++))
    do
        rand=`echo "$RANDOM%$arr"|bc`
        mod=`echo "${ball[$rand]}%2"|bc`
        if [[ $mod -eq 0 ]];then
            let m=$m+1
        fi
        unset ball[$rand]
        ball=(`echo ${ball[*]}`)
        let arr=$arr-1
    done
    if [[ $m -eq 5 ]];then
        let total=$total+1
    fi
done

echo "$total/$count"| bc -l

exit 0
结果结果差不多,比我感觉中的要低的多
.33950000000000000000
.34240000000000000000
.34830000000000000000
.34350000000000000000

论坛徽章:
39
辰龙
日期:2013-08-21 15:45:192015亚冠之广州富力
日期:2015-05-12 16:34:52亥猪
日期:2015-03-03 17:22:00申猴
日期:2015-03-03 17:21:37未羊
日期:2014-10-10 13:45:41戌狗
日期:2014-06-17 09:53:29巨蟹座
日期:2014-06-12 23:17:17双鱼座
日期:2014-06-10 12:42:44寅虎
日期:2014-06-09 12:52:172015亚冠之卡尔希纳萨夫
日期:2015-05-24 15:24:35黄金圣斗士
日期:2015-12-02 17:25:0815-16赛季CBA联赛之吉林
日期:2017-06-24 16:43:52
32 [报告]
发表于 2014-07-30 12:41 |只看该作者
本帖最后由 关阴月飞 于 2014-07-30 13:34 编辑

原来是这个意思呀,为毛我算出来的在 .016左右
  1. for (( i=1;i<=10000;i++ ))
  2. do
  3. if [ `seq 20 |shuf -n 10 |grep -c '[13579]$'` -eq 5 ];then
  4.     let n++
  5. fi
  6. done
  7. let i--
  8. echo  "$n/$i" |bc -l
复制代码

论坛徽章:
24
申猴
日期:2014-10-10 15:56:39射手座
日期:2014-10-10 15:57:18黑曼巴
日期:2018-05-14 11:05:122016科比退役纪念章
日期:2018-05-14 11:05:0715-16赛季CBA联赛之北控
日期:2018-05-14 11:05:0015-16赛季CBA联赛之江苏
日期:2017-02-27 18:11:0715-16赛季CBA联赛之上海
日期:2018-08-15 09:48:5415-16赛季CBA联赛之佛山
日期:2018-07-20 17:14:2315-16赛季CBA联赛之佛山
日期:2019-09-10 18:08:4615-16赛季CBA联赛之山西
日期:2020-03-26 09:40:5115-16赛季CBA联赛之佛山
日期:2020-05-08 09:03:54
33 [报告]
发表于 2014-07-30 13:30 |只看该作者
本帖最后由 chengchow 于 2014-07-30 13:35 编辑

回复 32# 关阴月飞
shuf这个命令用的好,涨见识了


for (( i=1;i<=10000;i++ ))
do
if [ `seq 20 |shuf -n 10 |grep -c '[13579]$'` -eq 5 ];then
    let n++
fi
done
let i--
echo  "$n/$i" |bc -l

结果

.33400000000000000000
   
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP