〓 Mathematica 伍 〓at MATH〓 Mathematica 伍 〓 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このスレッドのURL■項目テキスト200:132人目の素数さん 12/05/08 15:27:08.62 次のバージョンって、いつ頃に出るんですか? 201:132人目の素数さん 12/05/09 09:41:46.97 クオンツの人いる? 202:132人目の素数さん 12/05/12 21:28:01.12 http://www.wolframalpha.com/ で曲面の曲率を計算させるにはどうすればいいのでしょうか? 203:132人目の素数さん 12/05/12 23:16:10.15 age 204:132人目の素数さん 12/05/13 13:15:33.68 ある関数の変数の変化率を連続ではなく、1、2、3・・・・とΔ=1で飛び飛びにとってプロットしたいのですがどうすればいいのでしょうか? 205:132人目の素数さん 12/05/13 22:06:09.02 Δ=1なら、 DifferenceDelta[Exp[i], i] /. i -> Range[10]; ListPlot[%] とかやね 206:132人目の素数さん 12/05/19 02:43:47.48 Plot3D[1/8 (6 Exp[-((2/3 Abs[x] - 1)^2 + (2/3 y)^2) - 1/3 (2/3 y + 1/2)^3] + 2/3 Exp[-2.818^11 ((Abs[2/3 x] - 1)^2 + (2/3 y)^2)^2] + 2/3 y - (2/3 x)^4), {x, -3, 3}, {y, -3, 3}, PlotRange -> {-2, 1}, BoxRatios -> {6, 6, 4}, PlotPoints -> {100, 100}, ColorFunctionScaling -> False, ColorFunction -> Function[{x, y, z}, If[Sqrt[(Abs[x] - 3/2)^2 + y^2] < 0.45, Blend[{Pink, LightPink}, 0.5], LightPink]], Mesh -> None] 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch