orange2015 の回答履歴

mathematicaの出力で、p && q || r と出たら、これは(p AND q) OR r の意味でしょうか、それとも、p AND (q OR r)の意味でしょうか？　 p || q && r と出たら、　p OR (q AND r) の意味でしょうか、それとも (p OR q) AND r の意味でしょうか？ && と||のいずれを優先した論理式を表しているかわからず、困っているのですが。お分かりの方、よろしくお願いします。

Mathematicaという数式処理システムについて、授業ではほとんど教わっておらず、説明なども飛ばし飛ばしで、一体何をやっているのだか、言っているのだか全く分からないまま課題が出されて、何をどうしてよいのか分からず、手が出ない状況で困っています。課題の内容を載せますので、どなたか解答を教えていただきたいです。出来れば何をどうしているのかも教えて頂けたら嬉しいのですが、解答だけでも十分ありがたいので、長くなってしまいますが、どうかよろしくお願いします。 １．分散を計算する以下の関数には、誤りがある。誤りを 指摘し、正しく動くよう修正しなさい。 myVariance[ arg1 ] : = ( xbar = Mean[arg1] ; temp1 = Table[ {i, 1, Length[arg1]}, (arg1[[i]] – xbar)^2]; N[ Apply[Plus, temp1] / Length[arg1] ] ) ２．正規分布の確率密度関数を描く関数grNormal を以下に 定義する。 (1)と(2)を埋めて関数を完成させなさい。 関数の入力引数は、平均mu, 標準偏差sigma, グラフを描く範囲(－xrange～xrange)の３つとする。 grNormal[mu_, sigma_, xrange_] :=　(1) ＿＿[{ndist, pdfunc, ymin=-0.01, ymax=0.43},　 (2) ＿＿＿＿＿＿＿＿＿; pdfunc = PDF[ndist, x]; Plot[pdfunc,{x, -xrange, xrange}, Frame->True,PlotRange->{{-xrange, xrange}, {ymin, ymax}}] ] ３．複合式を用いて平均を求める関数を以下に定義する。 (1) と(2)を埋めて関数を完成させなさい myMean[(1) ＿＿] := (data1 = Apply[Plus, arg1]; data2 = Length[arg1]; average = (2) ＿＿) ４．data1 は，10 人の学生の統計学試験の点数とその度数をリストで示したも のである．このデータからMathematica を用いて統計学試験の分散を求める関 数を2 通りの方法により以下に作成した．(1)と(2)の下線を埋めて完成させなさ い． また，それぞれがどのような方法か説明しなさい 【手法１】 data1 = List[40, 40, 40, 50, 50, 50, 50] myVari[arg1_] := (xbar = Mean[arg1]; temp1 = Table[(arg1[[i]]-xbar)^2,{i,1,Length[arg1]}]; (1) ＿＿＿＿＿) Vari = myVari[data1] 【手法２】 data1 = List[40, 40, 40, 50, 50, 50, 50] myVari[arg1_] := (xbar = Mean[arg1]; temp1 = Table[(arg1[[i]])^2,{i,1,Length[arg1]}]; (2) ＿＿＿＿＿) Vari = myVari[data1] ５．data1 は，10 人の学生の統計学試験の点数とその度数をリストで示した ものである．このデータからMathematica を用いて統計学試験の分散を 求める関数を以下に作成した．誤りを指摘し，正しく動作するよう修正 しなさい. data1 = List[40, 40, 40, 50, 50, 50, 50, 60, 70, 80] myVari[arg1] := (xbar = Mean[arg1]; temp1 = Table[(arg1[[i]]-xbar),{i,1,Length[arg1]}]; N[Apply[Plus, temp1] – xbar^2]) Vari = myVari[data1] ６．data1 は10 名の学生の右握力と球投げの結果を2 次元のリストで示したものである. このデータからMathematica を用いて共分散を求める関数を以下に作成した．下線 (1) と(2) を埋めて完成させなさい．なお, 　myC の第１引数には右握力(grip), 　 第2 引数には砲丸投げ(shot) の値を与えるものとする. data = List[{26,16},{26,11},{26,14},{27,16},{28,18}, {29,16},{32,18},{29,21},{24,14},{26,19}] <<Statistics’MultiDescriptiveStatistics’ TableForm[data1] grip = Table[data3[[i,1]],{i,1,10}] shot = Table[data3[[i,2]],{i,1,10}] myC[arg1_,arg2_] := (xbar = Mean[arg1]; ybar = Mean[arg2]; temp1= (1)______________________________________________; (2)____________________________________________________) myCorrelation = myC[grip,shot]