課題・アンケート結果 †

↑

第1回アンケート結果 †

↑

第2回課題結果 †

↑

第3回課題結果 †

↑

第4回課題結果 †

↑

第5回課題結果 †

↑

課題2のグラフで加点対象となった作品例 †

#05r_1.gif, #05r_2.gif

↑

第6回課題結果 †

↑

Wordの仮想レポートで良くできていた提出物 †

#07_1.gif

↑

Word仮想レポートについての補足 †

↑

第7回課題結果 †

↑

PowerPointで作られた模式図一覧 †

→模式図一覧

↑

第8回課題結果 **今回は6点満点で採点しました**) †

↑

良くできていた課題の評価 †

1番2番
1835
354
3036
3318
2940
258
1730
2736
736
435
3517
3536
1736
1736
3627
3035
2735
3025
740
64
717
727
3036
3018
3638
366
274
3617
1728
1230
3536
2736
628
730
1727
174
1735
3617
367
1730
↑

予習課題 †

↑

タイピング調査(6月4日) †

S+++ データの個数1
S++ データの個数1
S+ データの個数1
A++ データの個数2
A+ データの個数3
A データの個数2
B データの個数16
C データの個数12
G-D データの個数1
↑

第9回課題結果 †

↑

第10回課題結果 †

↑

課題の解答例 †

採点基準:

1.  「50を5で割り得られた結果を画面に表示し、その数字をまた5で割るという操作を10回繰り返すプログラムを、繰り返し文( for(i in 1:10){})を使って作成しなさい。

x=50
for(i in 1:10){
  x=x/5
  print(x)
}

   実行結果:

[1] 10
[1] 2
[1] 0.4
[1] 0.08
[1] 0.016
[1] 0.0032
[1] 0.00064
[1] 0.000128
[1] 2.56e-05
[1] 5.12e-06

2.  乱数を1つずつ20回発生させて、0.5未満のものだけを画面に表示させるプログラムを、繰り返し文(for)と条件分岐(if)を使って作成しなさい。

for(i in 1:20){
  ransu=runif(1)
  if(ransu<0.5){
     print(ransu)
  }
}

 

[1] 0.2072987
[1] 0.2232453
[1] 0.4220769
[1] 0.4809181
[1] 0.3698973
[1] 0.1453426
[1] 0.3212709
[1] 0.1480905
[1] 0.4044947
[1] 0.06828466