关于RANDOM 的例子
时间：2008-03-05 来源：西门子
例子 9-24. 产生随机整数
1 #!/bin/bash 2 3 # 每次调用$RANDOM都会返回不同的随机整数. 4 # 范围为: 0 - 32767 (带符号的16位整数). 5 6 MAXCOUNT=10 7 count=1 8 9 echo 10 echo "$MAXCOUNT random numbers:" 11 echo "-----------------" 12 while [ "$count" -le $MAXCOUNT ] # 产生10($MAXCOUNT)个随机整数. 13 do 14 number=$RANDOM 15 echo $number 16 let "count += 1" # 增加计数. 17 done 18 echo "-----------------" 19 20 # 如果你需要某个范围的随机整数，可以使用取模操作符.(译者注：事实上，这不是一个非常好的办法。理由请见man 3 rand) 21 # 取模操作会返回除法的余数. 22 23 RANGE=500 24 25 echo 26 27 number=$RANDOM 28 let "number %= $RANGE" 29 # ^^ 30 echo "Random number less than $RANGE --- $number" 31 32 echo 33 34 35 36 # 如果你需要一个大于某个下限的随机整数, 37 #+ 应该增加测试以便抛弃所有小于此下限值的数值. 38 39 FLOOR=200 40 41 number=0 #初始化 42 while [ "$number" -le $FLOOR ] 43 do 44 number=$RANDOM 45 done 46 echo "Random number greater than $FLOOR --- $number" 47 echo 48 49 # 让我们检测另外一个完成上面循环作用的简单办法，即 50 # let "number = $RANDOM + $FLOOR" 51 # 这能避免了while循环，并且运行得更快。 52 # 但，使用这个技术可能会产生问题，思考一下是什么问题？ 53 54 55 56 # 联合上面两个技巧重新产生在两个限制值之间的随机整数. 57 number=0 #初始化 58 while [ "$number" -le $FLOOR ] 59 do 60 number=$RANDOM 61 let "number %= $RANGE" # Scales $number down within $RANGE. 62 done 63 echo "Random number between $FLOOR and $RANGE --- $number" 64 echo 65 66 67 68 # 产生二元值，即"真"或"假". 69 BINARY=2 70 T=1 71 number=$RANDOM 72 73 let "number %= $BINARY" 74 # 注意 let "number >>= 14" 会产生更平均的随机分布 #(译者注：正如在man手册里提到的，更高位的随机分布更平均， 75 #+ (除了最后的二元值右移出所有的值). #取模操作使用低位来产生随机会相对不平均) 76 if [ "$number" -eq $T ] 77 then 78 echo "TRUE" 79 else 80 echo "FALSE" 81 fi 82 83 echo 84 85 86 # 模拟掷骰子. 87 SPOTS=6 # 模除 6 会产生 0 - 5 之间的值. 88 # 结果增1会产生 1 - 6 之间的值. 89 # 多谢Paulo Marcel Coelho Aragao的简化. 90 die1=0 91 die2=0 92 # 这会比仅设置SPOTS=7且不增1好?为什么会好？为什么会不好? 93 94 # 单独地掷每个骰子，然后计算出正确的机率. 95 96 let "die1 = $RANDOM % $SPOTS +1" # 掷第一个. 97 let "die2 = $RANDOM % $SPOTS +1" # 掷第二个. 98 # 上面的算术式中，哪个操作符优先计算 -- 99 #+ 取模 (%) 还是 加法 (+)? 100 101 102 let "throw = $die1 + $die2" 103 echo "Throw of the dice = $throw" 104 echo 105 106 107 exit 0 |
例子 9-25. 模拟从一副纸牌里随机抽一张纸牌
1 #!/bin/bash 2 # pick-card.sh 3 4 # 这是从一个数组中随机选择元素的例子. 5 6 7 # 抽出一张任意牌. 8 9 Suites="Clubs 10 Diamonds 11 Hearts 12 Spades" 13 14 Denominations="2 15 3 16 4 17 5 18 6 19 7 20 8 21 9 22 10 23 Jack 24 Queen 25 King 26 Ace" 27 28 # 注意变量值由多行组成. 29 30 31 suite=($Suites) # 读入一个数组. 32 denomination=($Denominations) 33 34 num_suites=${#suite[*]} # 计算有几个数组元素. 35 num_denominations=${#denomination[*]} 36 37 echo -n "${denomination[$((RANDOM%num_denominations))]} of " 38 echo ${suite[$((RANDOM%num_suites))]} 39 40 41 # $bozo sh pick-cards.sh 42 # Jack of Clubs 43 44 45 # 多谢"jipe,"指出$RANDOM的这个用法. 46 exit 0
|
Jipe 指出了一套技巧来产生一个范围里的随机数。
1 # 产生 6 和 30之间的随机数. 2 rnumber=$((RANDOM%25+6)) 3 4 # 产生在 6 - 30 之间的随机数, 5 #+ 但随机数还同时要满足被3整除. 6 rnumber=$(((RANDOM%30/3+1)*3)) 7 8 # 注意这将始终不能工作. 9 # 如果$RANDOM返回0，它就会失败. 10 11 # Frank Wang建议用下面的办法: 12 rnumber=$(( RANDOM%27/3*3+6 )) |
Bill Gradwohl 提出一个改良的公式，这个公式只用于正数.
1 rnumber=$(((RANDOM%(max-min+divisibleBy))/divisibleBy*divisibleBy+min)) |
上面Bill展示了一个通用的函数，它可以返回两个指定值之间的随机数。
例子 9-26. 指定值之间的随机数
1 #!/bin/bash 2 # random-between.sh 3 # 产生两个指定值之间的随机数. 4 # 由Bill Gradwohl编写,并由本书作者作了些许修改. 5 # 已得到程序作者的许可. 6 7 8 randomBetween() { 9 # 产生在$min和$max之前的正或负的随机数 10 #+ 并且能被$divisibleBy整数除. 11 # 12 # 给出一个合理的随机分配的返回值. 13 # 14 # Bill Gradwohl - Oct 1, 2003 15 16 syntax() { 17 # 在函数中内嵌函数 18 echo 19 echo "Syntax: randomBetween [min] [max] [multiple]" 20 echo 21 echo "Expects up to 3 passed parameters, but all are completely optional." 22 echo "min is the minimum value" 23 echo "max is the maximum value" 24 echo "multiple specifies that the answer must be a multiple of this value." 25 echo " i.e. answer must be evenly divisible by this number." 26 echo 27 echo "If any value is missing, defaults area supplied as: 0 32767 1" 28 echo "Successful completion returns 0, unsuccessful completion returns" 29 echo "function syntax and 1." 30 echo "The answer is returned in the global variable randomBetweenAnswer" 31 echo "Negative values for any passed parameter are handled correctly." 32 } 33 34 local min=${1:-0} 35 local max=${2:-32767} 36 local divisibleBy=${3:-1} 37 # 默认值分配,用来处理没有参数传递进来的时候. 38 39 local x 40 local spread 41 42 # 确认divisibleBy是正值. 43 [ ${divisibleBy} -lt 0 ] && divisibleBy=$((0-divisibleBy)) 44 45 # 完整性检查. 46 if [ $# -gt 3 -o ${divisibleBy} -eq 0 -o ${min} -eq ${max} ]; then 47 syntax 48 return 1 49 fi 50 51 # 察看是否min和max颠倒了. 52 if [ ${min} -gt ${max} ]; then 53 # Swap them. 54 x=${min} 55 min=${max} 56 max=${x} 57 fi 58 59 # 如果min自己并不能够被$divisibleBy整除, 60 #+ 那么就调整min的值,使其能够被$divisibleBy整除,前提是不能放大范围. 61 if [ $((min/divisibleBy*divisibleBy)) -ne ${min} ]; then 62 if [ ${min} -lt 0 ]; then 63 min=$((min/divisibleBy*divisibleBy)) 64 else 65 min=$((((min/divisibleBy)+1)*divisibleBy)) 66 fi 67 fi 68 69 # 如果min自己并不能够被$divisibleBy整除, 70 #+ 那么就调整max的值,使其能够被$divisibleBy整除,前提是不能放大范围. 71 if [ $((max/divisibleBy*divisibleBy)) -ne ${max} ]; then 72 if [ ${max} -lt 0 ]; then 73 max=$((((max/divisibleBy)-1)*divisibleBy)) 74 else 75 max=$((max/divisibleBy*divisibleBy)) 76 fi 77 fi 78 79 # --------------------------------------------------------------------- 80 # 现在,来做真正的工作. 81 82 # 注意,为了得到对于端点来说合适的分配, 83 #+ 随机值的范围不得不落在 84 #+ 0 和 abs(max-min)+divisibleBy之间, 而不是 abs(max-min)+1. 85 86 # 对于端点来说, 87 #+ 这个少量的增加将会产生合适的分配. 88 89 # 修改这个公式,使用abs(max-min)+1来代替abs(max-min)+divisibleBy的话, 90 #+ 也能够产生正确的答案, 但是在这种情况下生成的随机值对于正好为端点倍数 91 #+ 的这种情况来说将是不完美的,因为在正好为端点倍数的情况的随机率比较低, 92 #+ 因为你才加1而已,这比正常的公式所产生的机率要小得多(正常为加divisibleBy) 93 # --------------------------------------------------------------------- 94 95 spread=$((max-min)) 96 [ ${spread} -lt 0 ] && spread=$((0-spread)) 97 let spread+=divisibleBy 98 randomBetweenAnswer=$(((RANDOM%spread)/divisibleBy*divisibleBy+min)) 99 100 return 0 101 102 # 然而,Paulo Marcel Coelho Aragao指出 103 #+ 当$max和$min不能被$divisibleBy整除时, 104 #+ 这个公式将会失败. 105 # 106 # 他建议使用如下的公式: 107 # rnumber = $(((RANDOM%(max-min+1)+min)/divisibleBy*divisibleBy)) 108 109 } 110 111 # 让我们测试一下这个函数. 112 min=-14 113 max=20 114 divisibleBy=3 115 116 117 # 产生一个数组answers,answers的下标用来表示在范围内可能出现的值, 118 #+ 而内容记录的是对于这个值出现的次数,如果我们循环足够多次,一定会得到一次出现机会. 119 120 declare -a answer 121 minimum=${min} 122 maximum=${max} 123 if [ $((minimum/divisibleBy*divisibleBy)) -ne ${minimum} ]; then 124 if [ ${minimum} -lt 0 ]; then 125 minimum=$((minimum/divisibleBy*divisibleBy)) 126 else 127 minimum=$((((minimum/divisibleBy)+1)*divisibleBy)) 128 fi 129 fi 130 131 132 # 如果maximum自己并不能够被$divisibleBy整除, 133 #+ 那么就调整maximum的值,使其能够被$divisibleBy整除,前提是不能放大范围. 134 135 if [ $((maximum/divisibleBy*divisibleBy)) -ne ${maximum} ]; then 136 if [ ${maximum} -lt 0 ]; then 137 maximum=$((((maximum/divisibleBy)-1)*divisibleBy)) 138 else 139 maximum=$((maximum/divisibleBy*divisibleBy)) 140 fi 141 fi 142 143 144 # 我们需要产生一个下标全为正的数组, 145 #+ 所以我们需要一个displacement来保正都为正的结果. 146 147 148 displacement=$((0-minimum)) 149 for ((i=${minimum}; i<=${maximum}; i+=divisibleBy)); do 150 answer[i+displacement]=0 151 done 152 153 154 # 现在我们循环足够多的次数来得到我们想要的答案. 155 loopIt=1000 # 脚本作者建议 100000, 156 #+ 但是这实在是需要太长的时间了. 157 158 for ((i=0; i<${loopIt}; ++i)); do 159 160 # 注意,我们在这里调用randomBetween函数时,故意将min和max颠倒顺序 161 #+ 我们是为了测试在这种情况下,此函数是否还能得到正确的结果. 162 163 randomBetween ${max} ${min} ${divisibleBy} 164 165 # 如果答案不是我们所预期的,那么就报告一个错误. 166 [ ${randomBetweenAnswer} -lt ${min} -o ${randomBetweenAnswer} -gt ${max} ] && echo MIN or MAX error - ${randomBetweenAnswer}! 167 [ $((randomBetweenAnswer%${divisibleBy})) -ne 0 ] && echo DIVISIBLE BY error - ${randomBetweenAnswer}! 168 169 # 将统计值存到answer之中. 170 answer[randomBetweenAnswer+displacement]=$((answer[randomBetweenAnswer+displacement]+1)) 171 done 172 173 174 175 # 让我们察看一下结果 176 177 for ((i=${minimum}; i<=${maximum}; i+=divisibleBy)); do 178 [ ${answer[i+displacement]} -eq 0 ] && echo "We never got an answer of $i." || echo "${i} occurred ${answer[i+displacement]} times." 179 done 180 181 182 exit 0
|
$RANDOM到底有多随机?最好的办法就是写个脚本来测试一下.跟踪随机数的分配情况.
让我们用随机数摇一个骰子 . . .
例子 9-27. 用RANDOM模拟掷单个骰子
1 #!/bin/bash 2 # RANDOM到底有多random? 3 4 RANDOM=$$ # 使用脚本的进程ID来作为随机数的产生种子. 5 6 PIPS=6 # 一个骰子有6面. 7 MAXTHROWS=600 # 如果你没别的事干,那么可以增加这个数值. 8 throw=0 # 抛骰子的次数. 9 10 ones=0 # 必须把所有count都初始化为0, 11 twos=0 #+因为未初始化的变量为null,不是0. 12 threes=0 13 fours=0 14 fives=0 15 sixes=0 16 17 print_result () 18 { 19 echo 20 echo "ones = $ones" 21 echo "twos = $twos" 22 echo "threes = $threes" 23 echo "fours = $fours" 24 echo "fives = $fives" 25 echo "sixes = $sixes" 26 echo 27 } 28 29 update_count() 30 { 31 case "$1" in 32 0) let "ones += 1";; # 因为骰子没有0,所以给1. 33 1) let "twos += 1";; # 对tows做同样的事. 34 2) let "threes += 1";; 35 3) let "fours += 1";; 36 4) let "fives += 1";; 37 5) let "sixes += 1";; 38 esac 39 } 40 41 echo 42 43 44 while [ "$throw" -lt "$MAXTHROWS" ] 45 do 46 let "die1 = RANDOM % $PIPS" 47 update_count $die1 48 let "throw += 1" 49 done 50 51 print_result 52 53 exit 0 54 55 # 如果RANDOM是真正的随机,那么摇出来结果应该平均的. 56 # $MAXTHROWS设为600,那么每面都应该为100,上下的出入不应该超过20. 57 # 58 # 记住RANDOM毕竟只是一个伪随机数, 59 #+ 并且不是十分完美的. 60 61 # 随机数的产生是一个深奥并复杂的问题. 62 # 足够长的随机序列,不但会展现杂乱无章的一面, 63 #+ 而且会展现机会均等的一面. 64 65 # 练习 (容易): 66 # --------------- 67 # 重写这个例子,做成抛1000次硬币的形式. 68 # 分为正反两面.
|
像我们在上边的例子中看到的,最好在每次随机数产生时都使用新的种子.应为如果使用同样的种子的话,那么随机数将产生相同的序列. [2] (C中random()函数也会有这样的行为.)
例子 9-28. 重新分配随机数种子
1 #!/bin/bash 2 # seeding-random.sh: 设置RANDOM变量作为种子. 3 4 MAXCOUNT=25 # 决定产生多少个随机数. 5 6 random_numbers () 7 { 8 count=0 9 while [ "$count" -lt "$MAXCOUNT" ] 10 do 11 number=$RANDOM 12 echo -n "$number " 13 let "count += 1" 14 done 15 } 16 17 echo; echo 18 19 RANDOM=1 # 为随机数的产生设置RANDOM种子. 20 random_numbers 21 22 echo; echo 23 24 RANDOM=1 # 设置同样的种子... 25 random_numbers # ...将会和上边产生的随机数列相同. 26 # 27 # 复制一个相同的随机数序列在什么时候有用呢? 28 29 echo; echo 30 31 RANDOM=2 # 再试一下,但这次使用不同的种子... 32 random_numbers # 将给出一个不同的随机数序列. 33 34 echo; echo 35 36 # RANDOM=$$ 使用脚本的进程id 作为随机数的种子. 37 # 从'time'或'date'命令中取得RANDOM作为种子也是很常用的办法. 38 39 # 一个有想象力的方法... 40 SEED=$(head -1 /dev/urandom | od -N 1 | awk '{ print $2 }') 41 # 首先从/dev/urandom(系统伪随机设备文件)中取出1行, 42 #+ from /dev/urandom (system pseudo-random device-file), 43 #+ 然后着这个可打印行转换为(8进制)数,通过使用"od"命令, 44 #+ 最后使用"awk"来获得一个数. 45 RANDOM=$SEED 46 random_numbers 47 48 echo; echo 49 50 exit 0
|
|
/dev/urandom设备文件提供了一种比单独使用$RANDOM更好的,能产生更"随机"的随机数的方法.dd if=/dev/urandom of=targetfile bs=1 count=XX能够产生一个很分散的为随机数.然而,将这个数赋值到一个脚本文件的变量中,还需要可操作性,比如使用"od"命令(就像上边的例子,见Example 12-13),或者使用dd命令(见Example 12-55),或者管道到"md5sum"命令中(见Example 33-14). 当然还有其它的产生伪随机数的方法.Awk就可以提供一个方便的方法. 例子 9-29. 使用awk产生伪随机数
"date"命令也可以用来产生伪随机整数序列. |
注
| [1] |
真正的随机事件(在它存在的范围内),只发生在特定的几个未知的自然界现象中,比如放射性衰变.计算机只能产生模拟的随机事件,并且计算机产生的"随机"数因此只能称为伪随机数. |
| [2] |
计算机产生的伪随机数序列用的种子可以被看成是一种标识标签.比如,使用种子23所产生的伪随机数序列就被称作序列#23. |
相关阅读 更多 +
