ベストアンサー

統計とコンピュータの演習問題！

2013/03/15 23:57

統計とコンピュータの演習問題で次のような実験を行って、問いに答えるという問題について教えてほしいです！！「１０個のさいころを同時に投げ、１０個のうち偶数の個数の目が出たさいころがいくつあったかを記録する。これを100回繰り返す。」（１）結果を度数分布表にまとめよ。まず、この実験はパソコンでどうやってやるかと（１）の問題のやり方も教えてほしいです！お願いします！

noname#248084

数学・算数
回答数7
ありがとう数3

みんなの回答 （7）
専門家の回答

質問者が選んだベストアンサー

ベストアンサー

USB99
ベストアンサー率53% (2222/4131)

2013/03/16 09:14 回答No.7

EXCELもなければ、下記のjavascriptをUTF8でテキストとして保存、そのファイル名を適当な名前.htmlとして、google chromeなどのブラウザにdrag & dropすればいいかと。 <html> <head> <title>１０個のサイコロを１００回</title> <script language="JavaScript"></script> </head> <body> </body> </html>

質問者

お礼 2013/03/16 11:03

ありがとうございましたm(_ _)m 本当に助かりました！

ログインすると、全ての回答が全文表示されます。

その他の回答 (6)

USB99
ベストアンサー率53% (2222/4131)

2013/03/16 01:44 回答No.6

すみません、１０個のサイコロでしたね。だとすると Sub goo() Dim kaisu(10) For i = 1 To 100 k = 0 For j = 1 To 10 kazu = Int(Rnd * 6 + 1) amari = kazu Mod 2 If amari = 0 Then k = k + 1 End If Next j kaisu(k) = kaisu(k) + 1 Next i For m = 1 To 10 Cells(m, 1) = kaisu(m) Next m End Sub

ログインすると、全ての回答が全文表示されます。

USB99
ベストアンサー率53% (2222/4131)

2013/03/16 01:38 回答No.5

EXCELのVBAだと Sub goo() Dim kaisu(6) For i = 1 To 100 k = 0 For j = 1 To 6 kazu = Int(Rnd * 6 + 1)'乱数で１～６の整数を得る amari = kazu Mod 2'２でわって余りを得る If amari = 0 Then'偶数？ k = k + 1 End If Next j kaisu(k) = kaisu(k) + 1 Next i For m = 1 To 6 Cells(m, 1) = kaisu(m) Next m End Sub 開発→visual basic→挿入→標準モジュールとして、上記をコピーしてください。あと、HSPなどもいいかも。

ログインすると、全ての回答が全文表示されます。

asuncion
ベストアンサー率33% (2127/6290)

2013/03/16 00:45 回答No.4

何回もすみません。さっきのは、結果の例がおかしかったですね。 1回： 2 ** 2回： 7 ******* 3回：12 ************ 4回：16 **************** 5回：23 *********************** 6回：25 ************************* 7回： 8 ******** 8回： 6 ****** 9回： 1 * 10回： 0

質問者

お礼 2013/03/16 00:58

ありがとうございます！！これってC言語使わないでってできますか？何度もすいません><

ログインすると、全ての回答が全文表示されます。

asuncion
ベストアンサー率33% (2127/6290)

2013/03/16 00:37 回答No.3

もっと視覚に訴えたければ、こうですかね。 #include <stdio.h> #include <stdlib.h> #include <time.h> int main(void) { int count[100], n[11] = { 0 }, i, j; srand((unsigned) time(NULL)); for (i = 0; i < 100; i++) { for (count[i] = j = 0; j < 10; j++) { if ((rand() % 6 + 1) % 2 == 0) { count[i]++; } } n[count[i]]++; } for (i = 1; i <= 10; i++) { printf("%2d回：%2d ", i, n[i]); for (j = 1; j <= n[i]; j++) { putchar('*'); } putchar('\n'); } return 0; } 結果の例 1回： 1 * 2回： 7 ******* 3回：16 **************** 4回：18 ****************** 5回：28 **************************** 6回：18 ****************** 7回： 7 ******* 8回： 2 ** 9回： 0 10回： 1 *

ログインすると、全ての回答が全文表示されます。

asuncion
ベストアンサー率33% (2127/6290)

2013/03/16 00:28 回答No.2

度数分布表だったら、こっちですね。 #include <stdio.h> #include <stdlib.h> #include <time.h> int main(void) { int count[100], n[11] = { 0 }, i, j; srand((unsigned) time(NULL)); for (i = 0; i < 100; i++) { for (count[i] = j = 0; j < 10; j++) { if ((rand() % 6 + 1) % 2 == 0) { count[i]++; } } } for (i = 0; i < 100; i++) { n[count[i]]++; } for (i = 1; i <= 10; i++) { printf("%2d回：%2d\n", i, n[i]); } return 0; } 結果の例 1回： 1 2回： 7 3回：11 4回：17 5回：24 6回：28 7回：10 8回： 2 9回： 0 10回： 0 4回～6回のあたりに山が来ていることがわかると思います。まあ、予想どおりですね。

ログインすると、全ての回答が全文表示されます。

asuncion
ベストアンサー率33% (2127/6290)

2013/03/16 00:17 回答No.1

C言語が使えるのであれば、例えば次のようなコードを実行してみるとなにがしかの結果が出るかもしれません。 #include <stdio.h> #include <stdlib.h> #include <time.h> int main(void) { int count[100], i, j; srand((unsigned) time(NULL)); for (i = 0; i < 100; i++) { for (count[i] = j = 0; j < 10; j++) { if ((rand() % 6 + 1) % 2 == 0) { count[i]++; } } } for (i = 0; i < 100; i++) { printf("%2d ", count[i]); while(count[i]--) { putchar('*'); } putchar('\n'); } return 0; } 結果の例 6 ****** 3 *** 3 *** 6 ****** 8 ******** 3 *** 4 **** 5 ***** 5 ***** 3 *** 5 ***** 6 ****** 7 ******* 3 *** 7 ******* 4 **** 5 ***** 5 ***** 7 ******* 5 ***** 4 **** 6 ****** 5 ***** 5 ***** 3 *** 6 ****** 3 *** 6 ****** 6 ****** 5 ***** 7 ******* 4 **** 5 ***** 5 ***** 4 **** 5 ***** 7 ******* 5 ***** 6 ****** 5 ***** 5 ***** 2 ** 8 ******** 6 ****** 5 ***** 7 ******* 2 ** 5 ***** 4 **** 2 ** 7 ******* 3 *** 5 ***** 4 **** 5 ***** 5 ***** 8 ******** 5 ***** 6 ****** 4 **** 5 ***** 7 ******* 6 ****** 3 *** 8 ******** 5 ***** 8 ******** 7 ******* 6 ****** 5 ***** 3 *** 3 *** 5 ***** 4 **** 4 **** 6 ****** 5 ***** 5 ***** 3 *** 4 **** 7 ******* 6 ****** 7 ******* 6 ****** 5 ***** 4 **** 4 **** 4 **** 4 **** 4 **** 5 ***** 4 **** 5 ***** 4 **** 6 ****** 6 ****** 4 **** 5 ***** 2 ** 7 *******

ログインすると、全ての回答が全文表示されます。