用计算机抽样,利用计算机代替随机数骰子进行随机抽样

7己

2, ,L7 7

1鳞 ,舌眵仟, , 垣

用计算机代替随机数骰子进行随机抽样

剞 尹 开

(长沙市产品质量监督检验所)

摘要 本文介绍7用电子计算机产生随

机数 代替用随机数 骰子得 到随机数进行随机抽

样的方法,并列举 7在 PC一 1500机上 运 行

的实例,此击具有简单,-睫速、科学的优点,

易于推 广。

关 键词 随机数骰子,随机抽样,随机

数,PC一15OO计算机。

1 概 述

在产品质量监督检查中,抽样是整个工作

中非常重要的一个步骤,而随机抽样是在各种

领域的抽样调查和产品质量的抽样检查中,运

媚最多的一种抽样方法。但是为了排除抽样时

主观因素或其它因素造成的影响,提高所抽取

样品的代表性,国家制定了GB10111-88“利

用随机数骰子进行随机抽样酊方祛 ,此方珐

是把抽 撑单元或单位产品按 自然数从 “1 开

始顺序编号,接着摇骰子,读取骰子显示的随

机数,然后判断随机数的取舍,最后根据所取

的随机数对号抽取样品。由此 可 见,采 用 按

GBlOlll-gg的摇骰子的方法读取随凯数,存

在大量合弃所摇出的随机数或需要 计 算 等 不

足,手续繁琐费时。如利用电子计算机的强劲

动能,直接输出几个满足抽样条件所需的随机

教,则可以迅速直接对号抽样,达到省掉繁琐

过程、简单、快速、科学的目的。采用计算机

取随机数,不仅避免了摇艘子的手工操作或有

关余数的繁琐计算,而且它会 自动弃去超出产

品件数的不合格的随机数和不产生相同的随机

数。由于技术监督抽样工作点 多 面 广,为 了

适应实际工作需要,本文特刖选择 了 体 积 改

19.5cm ×9.0cm ×2.5crn,方便随身携带的

PC一1500计算机来解决上述问题。由于二种

产生随机数的方法均是随机过程,根据概率沦

的原理,它们抽样检验后合格或不台格的概率

相同。

32

2 程序框图

f- ’;

广一N 苎兰 竺竺竺v苎-至塑皇

Y /

\ 是否得到L个随机数?

( )

一 二

\ 一

圈 1 程序框匿

程序框图如图 1所示。

5 程序清单

10{ INPUT N,M :DIM R (柚) ; K :2

20: R (1) :RND ( ) PRINT R (1)

30 R (K) :RND (N)

40, FOR I:ITO K 1

50 IF R (I) =R (K)THEN 30

60: NEXT I

70: PRINT R (K)

80: K :K 4-1

9O IF Kj M +1 TH EN 1 20

100: GOTO 30

120t END

程序符号说明: ’

维普资讯 http://www.cqvip.com

N:总体大小或产 品批量,同GB101]I中

的N;

M:随机抽取个体的个数,同 GB10111中

的 n。 -

4 运行实仞

蜘:N=113,n=5。印计算机程序中 N=

113, M =5。

按 (ON)键开机,按 (MODEl键计算

机调在 PRO(即编程)状态,按程序清单输 入

产生随机数进行随机抽样程序。按(MODEl

键再将计算机调至RUN (即程序运行)状态,

屏幕显示>。键盘输入RUN后按 回车键 (/)。

程序即开始工作,屏幕显示?,按程序要求依

次键盘输入113/,5/。屏幕上将显示第一个

I遗机数,然后按一次/显示一个随机数,直至

5个随

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值