ソフトウェア/Mathematica のバックアップ(No.20)

更新


公開メモ

すぐ忘れてしまうので、よく使うコマンドを書いておく

n が整数であることや、偶数であることを仮定して変形

% // FullSimplify[#, n \[Element] Integers] &
% // FullSimplify[#, Mod[n,2]==0] &
  • # と & で純関数を作っている

y を x+1 や x-1 に置き換えて展開

% /. y -> {x+1, x-1} // Expand

複素積分

Curve[t] に沿って F[z] を t = 0 から 1 まで積分:

Assuming[z = Curve[t], Integrate[F[z] D[z, t], {t, 0, 1}]]

数列リストを作成

1から10まで

Array[ F[#] &, 10 ]

リストに関数を適用

Array で作った数列の各要素に Expand を適用

Map[ Expand, Array[ (x+y)^# &, 10 ] ]

x に関する整式として式を整理

Collect[ expr, {x}]

不必要な ConditionalExpression を消す

ConditionalExpression[2, C[1] \[Element] Integers] // Normal

Normal を通せばいい

式を強制的に評価する

f = x^2 + y^2 + z^2 == 1
ContourPlot3D[Evaluate[f], {x, 0, 1}, {y, 0, 1}, {z, 0, 1}]

変数の値を指定して評価

With[{x=1}, expression]

コメント





Counter: 8314 (from 2010/06/03), today: 3, yesterday: 2