last.tie(UsingR)
last.tie()所属R语言包:UsingR
Last tie in 100 coin tosses
最后领带100掷硬币
译者:生物统计家园网 机器人LoveR
描述----------Description----------
Toss a coin 100 times and keep a running count of the number of heads and the number of tails. Record the times when the number is tied and report the last one. The distribution will have an approximate “arc-sine” law or well-shaped distribution.
投掷硬币100倍,并保持的头和尾的数量的数量的运行计数。记录号码时,捆绑和报告的最后一个。分布具有近似“圆弧正弦法”或井字形分布。
用法----------Usage----------
data(last.tie)
格式----------Format----------
200 numbers between 0 and 100 indicating when the last tie was.
200 0和100之间的数字,表示当最后的领带。
Details
详细信息----------Details----------
This data comes from simulating the commands: x = cumsum(sample(c(-1,1),100,replace=T))
这个数据来自模拟的命令:x = cumsum(sample(c(-1,1),100,replace=T))
and then finding the last tie with
然后找到最后领带
last.tie[i]<-max(0,max(which(!sign(x) == sign(x[length(x)])))).
last.tie[i]<-max(0,max(which(!sign(x) == sign(x[length(x)]))))。
实例----------Examples----------
data(last.tie)
hist(last.tie)
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|