create a new page, using
Mathematica
as a template.
[
Front page
|
List of pages
|
Search
|
Recent changes
|
Help
] [
New
]
recent(10)
2022-04-19
PowerPoint
TeX
SSH
FrontPage
RecentDeleted
PACS numbers
MenuBar
Comments/FrontPage
Mathematica
2022-03-11
Room
十字戟
趙雲
作成用情報
双扇
黄天当立
双刃剣
飛燕剣
ホウ徳
イベント戦闘
エディット武将
コメント
大喬
世の幕開け
新たなる
ディット武
ディ
大喬ホウ
の幕開
エデ
天当立
ント戦
戦
f2c
answer
app
http://imrdsoacha.gov.co/silvitra-120mg-qrms
--
johnansaz
?
2022-04-19 (Tue) 10:15:36
Name:
Start:
-[[高速化>./高速化]]
----
#contents
*部分行列の代入 [#nab29d2d]
行列matのi0行からi0+N行まで,j0列からj0+M列までにN×M行列s...
mat[[i0;;i0+N, j0;;j0+M]]=submat
とする.行列matはあらかじめ
mat=SparseArray[{},{Nmat,Mmat}]
などとして定義されていること.
*SparseArrayとメモリ [#g0f53a51]
SparseArrayの要素としてSparseArrayを代入するとメモリがお...
SparseArray a をさらにSparseArrayに代入するには
a = SparseArray[
.........
]//Normal
とNormalを使って,通常の行列に戻してから代入する.
*EigensystemのSort [#ua9879f2]
転置したものをSortすると便利.
Transpose[Sort[Transpose[Eigensystem[mat]]]]
*記号のショートカットキー [#na34a754]
-Dirac定数
--esc hb esc
-行列の転置
--esc tr esc (@abetomo999)
*ContourPlot [#v59b487f]
ContourPlot を EPS で Export する場合、 Mesh を False ...
回避法は以下。
Export["hoge.eps",
hoge/.{EdgeForm[],RGBColor[i1_,i2_,i3_],i___}:>{...
*リモートカーネル [#zd687e8b]
%%サーバーの sshd_config 内の StrictModes を no にする。%%
最初に SSH にて認証が行われる。
これは特に問題ない。
認証後、データのやりとりのために二つのポートが用いられる。
これは
-linkname ポート1@カーネルのアドレス,ポート2@カーネルの...
のようにオプション指定される…はずだがうまくいかない。
デフォルトでは
-linkname `2`
というようになっている。スロット`2`はポートをランダムに選...
というように、LANを越えて通信をするのはうまくいかない。
*級数展開 [#aa440a0a]
Series は関数をテーラー展開の定義式に従って計算する。
そのため、特異点における展開は失敗する。
このとき、必ずしもエラーにならず、適当な間違った値を返...
例えばこの問題は、線形分散を求めるような場合(線形なの...
この問題を回避するには、特異性のない関数に変換してからS...
例えば線形分散を求めるような場合には、その関数自体では...
*図をIllustratorに読み込ませる場合 [#p12737e2]
**Timesフォント [#b18db504]
Illustratorのフォントリストは
Program Files\Common Files\Adobe\TypeSpt
にある。これを編集するとIllustratorで読み込ませたときに出...
%BeginFont
Handler:WinTTHandler
FontType:TrueType
FontName:Times
FamilyName:Times New Roman
StyleName:Bold
WeightClass:700
WidthClass:5
AngleClass:0
FullName:Times New Roman
WritingScript:Roman
WinName:Times New Roman
FileLength:398372
%EndFont
これは、“Times”(これはシステムには存在しない)という名の...
前に書いてあるほど優先されるので、できるだけ先頭に追記す...
これにより、Illustratorで編集した後にEPSWRITEで無駄な情報...
**Mathematicaフォント [#q96ad1a8]
システムがMathematicaフォントを認識しても、Illustrator...
Program Files (x86)\Common Files\Adobe\Fonts 以下にMat...
Program Files\Wolfram Research\Mathematica\7.0\SystemFi...
*積分値が零の場合 [#zc9c73a5]
値が零になるような積分の場合、PrecisionGoalで精度を指定し...
収束しないといっても結局ほぼ零の値が返ってくるので気にし...
*等高線プロットの凡例(高級版) [#wbe19a82]
ExtendGraphicsパッケージをDLしておく。
読み込み
Needs["ExtendGraphics`LabelContour`"]
等高線プロットをしておく。
graph=ContourPlot[~~]
これを凡例を付けて表示する。
LabelContourLegend[graph]
Contourプロットの等高線の数によって凡例も自動的に付けてく...
なお、デフォルトの設定だと■と文字の間隔が大きすぎる気がす...
ついでにフォントの設定とかLegendLabelとかLegendShadowの有...
CENTER:&attachref(./contour.png);
*行列の列の置換 [#idd0a059]
行列と行ベクトルが
#pre{{
d = 1000;
mat = Array[a, {d, d}];
vec = Table[b[i], {i, 1, d}];
}}
とあったときに、matの第1行をvecで置換するのは簡単にできる。
#pre{{
mat = ReplacePart[mat, vec, 1];
}}
で同様に列の置換を簡単にできるかというとそういう関数は無...
//
//*<<と>> [#s4520b68]
// 例えば一回描画するのに比較的時間が掛かるグラフがある...
// Kernelを終了するとまた描画し直さなければならない。
// そこでGraphicsを「>>filename」で書き出しておく。
// 読み込むときは「<<filename」である。グラフ描画の場合...
//#pre{{
//Plot[x,{x,-1,1}]>>graph
//}}
// 読み込んで表示する場合は
//#pre{{
//Show[<<graph]
//}}
//となる。もちろんGraphics以外の場合にも同様に使える。
//*グラフの凡例 [#v11db838]
//GraphicsパッケージのLegendを使う。
//%%サイズ調整とかやりづらい。%%
//%%基本的にはデフォルトで表示位置を変えるくらいだが、凡...
//%%これに拘るんならGnuplotとかにやらせた方が良いかも…%%
//Mathematica上の表示とExportした後の画像で結構違いがある。
//デフォルトだとMathematica上で枠の右余白が広すぎる感があ...
//*グラフ出力 [#x8df05ec]
//いろいろ拘るとこんなもんか?やり過ぎ感もあるが。
//#pre{{{{
//Plot[Sin[x], {x, 0, 2Pi}, Frame -> True,
// DefaultFont -> {"Times", 10},
// FrameLabel -> {TraditionalForm[x],TraditionalForm[S...
// AxesOrigin -> {0, -1},
// PlotRange -> {
// {-0.001, 2 Pi},
// {-1.001, 1}
// },
// FrameTicks -> {
// {
// {0, 0, {.02, 0}},
// {Pi/2, Pi/2, {.02, 0}},
// {Pi, Pi, {.02, 0}},
// {3 Pi/2, 3 Pi/2, {.02, 0}},
// {2 Pi, 2 Pi, {.02, 0}}
// },
// {
// {-1, -1, {.02, 0}},
// {0, 0, {.02, 0}},
// {1, 1, {.02, 0}}
// }, None, None
// }
// ];
//Export["test.eps", %, ImageSize -> 180];
//}}}}
*二次元プロットのデータ出力 [#u7788059]
Export["x.dat",Plot[x,{x,0,1}][[1]][[1]][[1]][[1]]//Tabl...
#pcomment
End:
-[[高速化>./高速化]]
----
#contents
*部分行列の代入 [#nab29d2d]
行列matのi0行からi0+N行まで,j0列からj0+M列までにN×M行列s...
mat[[i0;;i0+N, j0;;j0+M]]=submat
とする.行列matはあらかじめ
mat=SparseArray[{},{Nmat,Mmat}]
などとして定義されていること.
*SparseArrayとメモリ [#g0f53a51]
SparseArrayの要素としてSparseArrayを代入するとメモリがお...
SparseArray a をさらにSparseArrayに代入するには
a = SparseArray[
.........
]//Normal
とNormalを使って,通常の行列に戻してから代入する.
*EigensystemのSort [#ua9879f2]
転置したものをSortすると便利.
Transpose[Sort[Transpose[Eigensystem[mat]]]]
*記号のショートカットキー [#na34a754]
-Dirac定数
--esc hb esc
-行列の転置
--esc tr esc (@abetomo999)
*ContourPlot [#v59b487f]
ContourPlot を EPS で Export する場合、 Mesh を False ...
回避法は以下。
Export["hoge.eps",
hoge/.{EdgeForm[],RGBColor[i1_,i2_,i3_],i___}:>{...
*リモートカーネル [#zd687e8b]
%%サーバーの sshd_config 内の StrictModes を no にする。%%
最初に SSH にて認証が行われる。
これは特に問題ない。
認証後、データのやりとりのために二つのポートが用いられる。
これは
-linkname ポート1@カーネルのアドレス,ポート2@カーネルの...
のようにオプション指定される…はずだがうまくいかない。
デフォルトでは
-linkname `2`
というようになっている。スロット`2`はポートをランダムに選...
というように、LANを越えて通信をするのはうまくいかない。
*級数展開 [#aa440a0a]
Series は関数をテーラー展開の定義式に従って計算する。
そのため、特異点における展開は失敗する。
このとき、必ずしもエラーにならず、適当な間違った値を返...
例えばこの問題は、線形分散を求めるような場合(線形なの...
この問題を回避するには、特異性のない関数に変換してからS...
例えば線形分散を求めるような場合には、その関数自体では...
*図をIllustratorに読み込ませる場合 [#p12737e2]
**Timesフォント [#b18db504]
Illustratorのフォントリストは
Program Files\Common Files\Adobe\TypeSpt
にある。これを編集するとIllustratorで読み込ませたときに出...
%BeginFont
Handler:WinTTHandler
FontType:TrueType
FontName:Times
FamilyName:Times New Roman
StyleName:Bold
WeightClass:700
WidthClass:5
AngleClass:0
FullName:Times New Roman
WritingScript:Roman
WinName:Times New Roman
FileLength:398372
%EndFont
これは、“Times”(これはシステムには存在しない)という名の...
前に書いてあるほど優先されるので、できるだけ先頭に追記す...
これにより、Illustratorで編集した後にEPSWRITEで無駄な情報...
**Mathematicaフォント [#q96ad1a8]
システムがMathematicaフォントを認識しても、Illustrator...
Program Files (x86)\Common Files\Adobe\Fonts 以下にMat...
Program Files\Wolfram Research\Mathematica\7.0\SystemFi...
*積分値が零の場合 [#zc9c73a5]
値が零になるような積分の場合、PrecisionGoalで精度を指定し...
収束しないといっても結局ほぼ零の値が返ってくるので気にし...
*等高線プロットの凡例(高級版) [#wbe19a82]
ExtendGraphicsパッケージをDLしておく。
読み込み
Needs["ExtendGraphics`LabelContour`"]
等高線プロットをしておく。
graph=ContourPlot[~~]
これを凡例を付けて表示する。
LabelContourLegend[graph]
Contourプロットの等高線の数によって凡例も自動的に付けてく...
なお、デフォルトの設定だと■と文字の間隔が大きすぎる気がす...
ついでにフォントの設定とかLegendLabelとかLegendShadowの有...
CENTER:&attachref(./contour.png);
*行列の列の置換 [#idd0a059]
行列と行ベクトルが
#pre{{
d = 1000;
mat = Array[a, {d, d}];
vec = Table[b[i], {i, 1, d}];
}}
とあったときに、matの第1行をvecで置換するのは簡単にできる。
#pre{{
mat = ReplacePart[mat, vec, 1];
}}
で同様に列の置換を簡単にできるかというとそういう関数は無...
//
//*<<と>> [#s4520b68]
// 例えば一回描画するのに比較的時間が掛かるグラフがある...
// Kernelを終了するとまた描画し直さなければならない。
// そこでGraphicsを「>>filename」で書き出しておく。
// 読み込むときは「<<filename」である。グラフ描画の場合...
//#pre{{
//Plot[x,{x,-1,1}]>>graph
//}}
// 読み込んで表示する場合は
//#pre{{
//Show[<<graph]
//}}
//となる。もちろんGraphics以外の場合にも同様に使える。
//*グラフの凡例 [#v11db838]
//GraphicsパッケージのLegendを使う。
//%%サイズ調整とかやりづらい。%%
//%%基本的にはデフォルトで表示位置を変えるくらいだが、凡...
//%%これに拘るんならGnuplotとかにやらせた方が良いかも…%%
//Mathematica上の表示とExportした後の画像で結構違いがある。
//デフォルトだとMathematica上で枠の右余白が広すぎる感があ...
//*グラフ出力 [#x8df05ec]
//いろいろ拘るとこんなもんか?やり過ぎ感もあるが。
//#pre{{{{
//Plot[Sin[x], {x, 0, 2Pi}, Frame -> True,
// DefaultFont -> {"Times", 10},
// FrameLabel -> {TraditionalForm[x],TraditionalForm[S...
// AxesOrigin -> {0, -1},
// PlotRange -> {
// {-0.001, 2 Pi},
// {-1.001, 1}
// },
// FrameTicks -> {
// {
// {0, 0, {.02, 0}},
// {Pi/2, Pi/2, {.02, 0}},
// {Pi, Pi, {.02, 0}},
// {3 Pi/2, 3 Pi/2, {.02, 0}},
// {2 Pi, 2 Pi, {.02, 0}}
// },
// {
// {-1, -1, {.02, 0}},
// {0, 0, {.02, 0}},
// {1, 1, {.02, 0}}
// }, None, None
// }
// ];
//Export["test.eps", %, ImageSize -> 180];
//}}}}
*二次元プロットのデータ出力 [#u7788059]
Export["x.dat",Plot[x,{x,0,1}][[1]][[1]][[1]][[1]]//Tabl...
#pcomment
Page: