速習Mathematicaと機械系の力学

大変申し訳ありませんが，下記の通り誤記を訂正致します．

下記表記には全角文字が含まれ，コピー＆ペーストではお使いになれない場合があります．

正誤表

p86　8行目　(第5章)

誤	wt=2+20(1-Round[t]);
正	wt=2+20(t-Round[t]);

p244　(第10章)

誤	ss1[q_]:=DiagonalMatrix[{a,b,1}]
正	ss1[a_, b_]:=DiagonalMatrix[{a,b,1}]

p249　9行目　(第10章)　

誤	para={x1→Cos[nq] Cos[q]),y1→Cos[nq]Sin[q]}/. n→3 ParametricPlot[{x1 /. para, y1 /. para),{q,0,2p}]
正	para={x1→Cos[nq] Cos[q],y1→Cos[nq]Sin[q]}/. n→3 ParametricPlot[{x1 /. para, y1 /. para},{q,0,2p}]