ex-7. Excel での乱数
Excel の使い方)
URL: https://www.kkaneko.jp/cc/excel/index.html
1
金子邦彦
アウトライン
7-1 乱数
7-2 乱数を用いたシミュレーションの例
2
7-1 乱数
3
乱数とは
乱数とは,ランダムな数値のこと.
乱数はシミュレーションに欠かせない.
4
コンピュータゲームで,敵キャラがランダ
ムに登場する
乱数を使って「現実感」を出す例
Excel の乱数
=RAND()
0 以上 1 未満の乱数
5
Excel の乱数
=TRUNC( RAND() * 10 ) + 1
1 以上 11 未満の乱数を整数化
{1, 2, 3, 4, 5, 6, 7, 8, 9, 10}
6
Excel の乱数
=RAND() * 10
0 以上 10 未満の乱数
=TRUNC( RAND() * 10 )
0 以上 10 未満の乱数を整数化
{0, 1, 2, 3, 4, 5, 6, 7, 8, 9}
=TRUNC( RAND() * 10 ) + 1
1 以上 11 未満の乱数を整数化
{1, 2, 3, 4, 5, 6, 7, 8, 9, 10}
TRUNC による整数化は,小数点以下切り捨
7
Excel演習
Excel を起動しなさい.起動したら「空白のブッ
ク」を選びなさい
8
{1, 2, 3, 4, 5, 6} の範囲の乱数
=TRUNC( RAND() * 6 ) + 1」をセル A1 に書きな
さい
A1に式「=TRUNC( RAND() * 6 ) + 1
9
セル A1 の式を,A2, A3, A4, A5 に「コピー&貼り付
」しなさい.
右クリックメニューが便利
乱数なので,実行のたびに
ランダムな値になる
10
新しくやりなおしたいので,次のように操作して,
新しく空白のブックを作りなさい
11
空白のブック
ファイル」を
クリック
新規
をクリック
0以上1未満の乱数の式
=RAND()」をセル A1 に書きなさい
A1に式「=RAND()
12
セル A1 の式を,
A2 から A20 と,B1 から B20
コピー&貼り付け」しなさい.
右クリックメニューが便利
13
乱数なので,実行のたびに
ランダムな値になる
セル A1 から B20 までのエリア を,マウスでド
ラッグして(範囲選択),散布図を選ぶ
14
散布図を作るための
プルダウンメニュー
マウスでドラッグ
(範囲選択)
挿入タブ
乱数の散布図が
得られる
7-2 乱数を用いたシミュレー
ションの例
15
シミュレーションの例
商品は 30円
硬貨は 10円玉,50円玉だけが使える
ある人は10円玉×3枚で買い物
自動販売機は,10円玉が3枚増える(+3)
ある人は50円玉×1枚で買い物(おつり20円を受
け取る)
自動販売機は,10円玉が2枚減る(-2)
16
シミュレーションにおけるイベントの例
イベント1
イベント2
17
自動販売機は,10円玉が3枚増える(+3)
自動販売機は,10円玉が2枚減る(-2)
Excel でランダムなイベントを発生させる例
=IF(RAND() < 0.7, 3, -2)
18
Excel で,
式「 =IF(RAND() < 0.7, 3, -2) 」を
コピー&貼り付け
確率 70% で「3」になり,
確率 30% で「-2」になる。
新しくやりなおしたいので,次のように操作して,
新しく空白のブックを作りなさい
19
空白のブック
ファイル」を
クリック
新規
をクリック
セル A1 0.7」を書きなさい
A1に値「0.7
20
セル A2 =IF(RAND() < A$1, 3, -2) 」を書きな
さい
A2に式「=IF(RAND() < A$1, 3, -2)
21
セル A2 の式を,A3 から A16 に「コピー&貼り付
」しなさい.
右クリックメニューが便利
確率 70% で「3」になり,
確率 30% で「-2」になる。
22
セル A17 =SUM(A2:A16) 」を書きなさい
A17に式「 =SUM(A2:A16)
10円×3枚 の人が全体の70%
50円×1枚 の人が全体の30%
のとき,
15人が買い物を終えると,
10円玉は何枚増えるか(減るか)の
シミュレーション
23
セル A1 を「0.5」に書きかえて,セル A17 の値
の変化をみなさい
10円×3枚 の人が全体の50%
50円×1枚 の人が全体の0%
のとき,
15人が買い物を終えると,
10円玉は何枚増えるか(減るか)の
シミュレーション
24
セル A1 を「0.3」に書きかえて,セル A17 の値
の変化をみなさい
10円×3枚 の人が全体の30%
50円×1枚 の人が全体の0%
のとき,
15人が買い物を終えると,
10円玉は何枚増えるか(減るか)の
シミュレーション
25
Excel演習
=IF(RAND() < 0.1, 100, -10)
26
Excel で,セル A1
式「 =IF(RAND() < 0.1, 100, -10)
A1 の式を A2 から A10 にコピー
&貼り付け
A11に式「 =SUM(A1:A10)
確率 10% で「100
確率 90% で「-10
次ページへ続く
=IF(RAND() < 0.1, 100, -10)
27
セル A1 から A11 を範囲選択し,
右クリックメニューで「コピー
B1 から A10 を範囲検索し,
右クリックメニューで「貼り付け」
11行は,次のシミュレーション結果
確率 10%で『100』,確率90%
-10」を10回繰り返したとき
確率 10% で「100
確率 90% で「-10