diff options
Diffstat (limited to 'texmf-dist/doc/support/ketcindy/source/ketmanual/referenceR4_2_2_ltd.tex')
-rw-r--r-- | texmf-dist/doc/support/ketcindy/source/ketmanual/referenceR4_2_2_ltd.tex | 1422 |
1 files changed, 0 insertions, 1422 deletions
diff --git a/texmf-dist/doc/support/ketcindy/source/ketmanual/referenceR4_2_2_ltd.tex b/texmf-dist/doc/support/ketcindy/source/ketmanual/referenceR4_2_2_ltd.tex deleted file mode 100644 index f77574b8..00000000 --- a/texmf-dist/doc/support/ketcindy/source/ketmanual/referenceR4_2_2_ltd.tex +++ /dev/null @@ -1,1422 +0,0 @@ -\documentclass[a4j]{jarticle} - -\usepackage{ketpic,ketlayer} -\usepackage{amsmath,amssymb} -\usepackage{enumerate} -%\usepackage{emathE} - -\newcommand{\tab}[2][12zw]{% -\noindent -\hspace*{2zw}\Ltab{#1 }{#2}% -} - -\newcommand{\chuu}[1][15zw]{% -\Ltab{#1}{}※ % -} - -\newcommand{\rei}[1][18zw]{% -\Rtab{#1}{例)\ }}% - -\newcommand{\reicr}[1][18zw]{% -\Rtab{#1}{ }}% - -\newcommand{\prompt}[1][+]{% -$>$ \verb#1} - -\newcommand{\dq}[1]{ -{\unitlength$<$- 0.0012in% -\begin{picture}% -(26.30,94.50)(2.40,0.00)% -\special{pn 8}% -\special{pa 3 -113}\special{pa 6 -78}\special{pa 12 -78}\special{pa 15 -113}\special{pa 3 -113}% -\special{sh 1}\special{ip}% -\special{pa 22 -113}\special{pa 25 -78}\special{pa 31 -78}\special{pa 34 -113}\special{pa 22 -113}% -\special{sh 1}\special{ip}% -\end{picture}}% -\,#1\,% -{\unitlength$<$- 0.0012in% -\begin{picture}% -(26.30,94.50)(2.40,0.00)% -\special{pn 8}% -\special{pa 3 -113}\special{pa 6 -78}\special{pa 12 -78}\special{pa 15 -113}\special{pa 3 -113}% -\special{sh 1}\special{ip}% -\special{pa 22 -113}\special{pa 25 -78}\special{pa 31 -78}\special{pa 34 -113}\special{pa 22 -113}% -\special{sh 1}\special{ip}% -\end{picture}}% -} - -\newcommand{\bq}{ -\hspace*{-2pt}% -{\unitlength=1pt% -\begin{picture}% -(1.80,7.00)(-0.90,0.00)% -\special{pn 8}% -% -\special{pn 12}% -\special{pa -11 -94}\special{pa 11 -72}% -\special{fp}% -\special{pn 8}% -\end{picture}}% -} - -\newenvironment{mini}[1]% -{\begin{minipage}[t]{#1}}% -{\end{minipage}% -} - - -%\enumSep{\narrowenumsep} - -\setmargin{15}{15}{15}{20} - -\begin{document} - -\begin{flushright} -2013年10月6日 -\end{flushright} - -\begin{center} -{\bf \huge \ketpic\ v4.2.2 ltd コマンド一覧}\vspace{3mm}\\ -{\bf \huge for R} -\end{center} - -\hfill -\begin{minipage}{4cm} -\Ltab{1.5cm}{PD}プロットデータ\\ -\end{minipage} - -%\vspace*{-2zw} - -\section{R についての注意} - -\begin{enumerate}[1.] - -\item KETpicの読込みには次を実行する.\\ -\hspace*{2zw}load("C:/work/ketpic.Rdata") (C:/work/は作業フォルダ名)\\\hspace*{-12zw}\chuu ディレクトリの変更は setwd("c:/work") - -\item 文字列は "(ダブル)で囲む\\ -\chuu 文字列の中に文字列を入れるときは ' と " を入れ子に使う. - -\item 関数などを引数とするときは,文字列とする.\\ -\hspace*{2zw}例)G$<$- Plotdata( "x\verb|^|2", "x=c(0,1)") -%\hspace*{2zw}注)プログラミングでは文字列を実行するコマンド evstr, execstr が重要である. -%\item -%数リスト,文字列,行列が混ざったデータ(基本データ)のリストはできない. -%Mixは混合リストを扱う. -%\hspace*{3zw}基本データ$\longrightarrow$混合列$\longrightarrow$混合リスト% -%$\longrightarrow$混合リスト$\longrightarrow\cdots$ - -\item \verb|\|(バックスラッシュ)を出力するには2つ並べてかく. - - -\item 注釈は \verb|#| - -%\item 実行の中断は abort - - -%\item 数値微分は derivative, 数値積分は integrate(またはintg) - -%\chuu Derivative, Integrate 参照 - -\item 数と文字列の変換\\ -\hspace*{2zw}as.character(数)\\ -\hspace*{2zw}as.numeric(文字列)\\ -\hspace*{2zw}eval(parse(text=文字列)))\\ -\hspace*{2zw}sprintf(書式,\ 数) 書式付き文字列 - -\item 異なる型のデータからリストを作るにはlistを用いる.\\ -\hspace*{2zw}作成 L\verb|<-| list(... , ... );\\ -\hspace*{2zw}取り出し A\verb|<-| L[[i]]\\ -\hspace*{2zw}部分リスト L[V]\ (V はベクトル)\\ -\hspace*{2zw}置き換え L[[i]]\verb|<-| ...\\ -%\hspace*{2zw}消去 L[[i]]<- NULL\\ -\hspace*{2zw}長さ length(L)\\ -\hspace*{2zw}追加 L\verb|<-| c(L1, L2)\\ -\hspace*{2zw}結合 c(L1,L2,...)\\ -\hspace*{2zw}空リスト list()\\ -\hspace*{2zw}タイプを見る is.list(L)(論理値)または mode(L) - -\end{enumerate} - -\section{Rのための追加コマンド} - -\tab{Member(D, L)}DがLの要素であればtrue,そうでなければfalseを返す.\\ -\chuu Lはベクトルまたは list - -\tab{Flattenlist(L)}Lを平準化して単層のリストを作る - -%\tab{Mix(D1, D2, $\cdots$)}FD列,MS,MLから(1段上の)MSまたはMLを作成 - -%\tab{Mixadd(L, D)}L(MSまたはML)にDを要素として加える - -\tab{Mixdisp({\it list})}listの要素を画面に簡易表示 - -%\tab{Mixjoin(L1, L2, ...)}要素を合併したlistを作る\\ -%\rei L1$<$- list(G1,G2,3); L2$<$- list(G3, "a")\\ -%\reicr L$<$- Mixjoin(L1,L2, c(3,6))\\ -%\reicr \hspace{2cm}LはG1, G2, 3, G3, "a", c(3, 6)のlist\\ -%\chuu \verb|c() , list()| は無視される - -%\tab{MixL(D1,D2, $\cdots$)}MS, MLから(1段上の)MLを作成 - -%\tab{Mixlength(L)}L(MSまたはML)の要素の個数 - -%\tab{Mixop(N, Data)}DataのN番目の要素(DataはMS, ML) - -%\tab{MixS(D1,D2, $\cdots$)}基本データ列からMSを作成 - -%\tab{Mixsub(範囲,L)}Lの範囲(リスト)の要素からなる部分MSまたはML\\ -%\rei S$<$- Mixsub( 2; 5, L); - -%\tab{Mixtype(Data)}Dataが基本データなら1,MSなら2,MLなら3を返す - -\tab{Op(N,\ Data)}DataのN番目の要素(Dataは文字列,ベクトル,list) - -\tab{Assign(式, 変数名, 値, ・・・)}\\ -\tab{}変数名(文字列)に値を割り当てた文字列を返す\\ -\chuu 値は,数,文字列,数行列,Scilablist\\ -\rei A$<$- 0.4; B$<$- c(2,1)\\ -\reicr Fn$<$- Assign("A*x\^{}2+B(1)*y\^{}2","A", A, "B", B) - -\tab{Assignset(変数名, 値, ・・・)}% -割り当て変数テーブルをセットする\\ -\rei Assignset("A", 0.4, "B", c(2,1), "C", list(...), "D", "string") - -%\tab{Assign(式)}式文字列の変数に割り当て変数リストを割り当てた文字列を返す\\ -%\rei Assign("A", 0.4, "B", c(2,1))\\ -%\reicr Fn$<$- Assign("A*x\^{}2+B(1)*y\^{}2") - -\tab{Assignset("?"+変数名)}変数名の値を返す\\ -\rei Assignset("?A") - -\tab{Assignset()}割り当て変数テーブルを初期化\\ -%\rei Assign("A", 0.4, "B", c(2,1))\\ -%\reicr Assign() - -\tab{Assignadd(変数名, 値, ・・・)}\\ -\tab{}割り当て変数テーブルに追加する\\ -\rei Assignadd("C", 0.4, "D", c(2,1)) - -\tab{Assignrep(変数名, 値, ・・・)}\\ -\tab{}割り当て変数テーブルを置き換える\\ -\rei Assignrep("C", 0.8) - -\tab{Prime(文字列)}文字列の最後に " をつける\\ -\rei Prime("A")\\ -\rei Prime() (" だけを出力)\\ -\chuu Assign("A\bq ") としてもよい. - - -%\tab{Strop(N,\ 文字列)}文字列のN番目の文字 - -%\tab{Subs(代入式,\ 有理式)}有理式に代入式で与えられる数値を代入した値を返す\\ -%\rei X$<$- poly(0,"X")\\ -%\reicr F$<$- X\verb|^|2+3\verb|*|X+3\\ -%\reicr V$<$- Subs("X$<$- 5",\ F) - -\tab{XMIN, XMAX, YMIN, YMAX}\\ -\tab{}ウィンドウ範囲 -(デフォルト$-5\leqq x\leqq 5,\ -5\leqq y\leqq 5$) - -\tab{Ptne(),Ptnw(),Ptsw(),Ptse()}\\ -\tab{}フレーム枠の各点 - -\tab{ThisVersion}Ketpicのバージョン - -\tab{Fracform(x\{, 分母の最大値\})}\\ -\tab{}xに近い分数(文字列)を返す\\ -\chuu 分母の最大値のデフォルトは100000\\\ -\rei Fracform(c(2.36)) - -\tab{Dotprod(v1,v2)}内積 - -\tab{Crossprod(v1,v2)}外積 - -\tab{Derivative(関数文字列,変数名,\{値ベクトル\}}\\ -\tab{}関数の微分係数を求める.\\ -\rei Derivative("x\verb|^|2+y", c("x","y"),c(2, 3))\\ -%\rei Assign("A", 3)\\ -%\reicr Derivative(Assign("x\verb|^|2+A*y"), "c(x,y)", c(2, 3), 2)\\ -%\chuu 変数の番号を指定しないときは,列ベクトルで返す. - -\tab{Integrate(関数文字列,変数文字列,積分区間(数リスト))}\\ -\tab{}関数の定積分を求める.\\ -\rei Integrate("sin(x)","x",c(0,pi))\\ -\chuu 区間(リスト)は積分を分けて計算するときに指定\\ -%\reicr Fn(x)","if x>0,Y$<$- 1,else,Y$<$- -1,end")|\\ -\reicr \verb|Integrate("Fn(x)","x",c(-2,0,3))|\\ - -%\tab{Thetadegree()}平行投影で$\theta$(度) - -%\tab{Phidegree()}平行投影で$\varphi$(度) - -%\vspace{-2zw} - -\section{設定コマンド} - -\subsection{基本} - -\tab{Setwindow(c(xmin, xmax), c(ymin, ymax))}\\ -\tab{}ウィンドウ範囲を設定\\ -\rei Setwindow(c(-pi, pi),\ $c(-1.5,1.5)$\,)\\ -\chuu XMIN , XMAX , YMIN , YMAX で値を得られる. - -\tab{Setscaling({\it ratio})}\\ -\tab{}縦の横に対する比を{\it ratio}に設定(デフォルトは 1)\\ -\rei Setscaling(2)\\ -\chuu ウィンドウも連動 - -\tab{Setax(線種, 横軸名, 位置, 縦軸名, 位置, 原点名, 位置)}\\ -\tab{}座標軸を設定(引数 7 個)\\ -\rei Setax("a", "t", "s", "u", "w", "O", "nw")\\ -\chuu 線種は d : line , a : arrow\\ -\chuu arrowのとき "a0.5" のように,矢印の大きさを指定できる.\\ -\chuu ""とすると,現在の設定を変更しない.\\ -\chuu 以降が "" のとき省略できる.また途中からも指定できる\\ -\rei Setax("a"\,)\\ -\rei Setax(6, "O", "se"\,) (6番目から指定)\\ -\chuu 位置は"n", "s", "e", "w", "ne", "nw", "se", "sw"\\ -\chuu "s2w3"のように微小移動量を付加してよい.\\ -\chuu 空引数のとき,現在の設定値を表示 - -\tab{Setorigin(\,点\,)}座標軸の原点を指定(デフォルトは$(0,\ 0)$)\\ -\chuu 空引数のとき,現在の設定値を表示 - -\tab{Setpen( 倍率 )}線の太さを指定(標準からの倍率で)\\ -\rei Setpen(1.5)\\ -\chuu 空引数のとき,現在の設定値を表示 - -\tab{Setpt( 倍率 )}Drwptの点の大きさを指定(標準からの倍率で)\\ -\chuu 空引数のとき,現在の設定値を表示 - -\tab{Setmarklen( 倍率 )}目盛りの大きさを指定(標準からの倍率で)\\ -\chuu 目盛りの大きさは微小移動量の単位としても用いられる.\\ -\chuu 空引数のとき,現在の設定値を表示 - -\tab{Setunitlen("単位長")}単位長を指定する\\ -\chuu Beginpicture("")とすると指定された単位長が使われる.\\ -\chuu 空引数のとき,現在の設定値を表示 -%\tab(13zw){resetunitlen()}コード書き出しを終える - -\tab{Setarrow(鏃の大きさ \{, 開き角 \{, 鏃位置 \{, 太さ\}\}\} \{, 形と位置\})}\\ -\tab{}矢印の形状を指定する\\ -\rei Setarrow(0.5, 1, 1, 0.7, "tf"\,)\\ -\chuu デフォルト 大きさ1 ,角度 18°,位置は終点\\ -\chuu 5以下の開き角を指定したときは,18°からの倍率とする\\ -\chuu 形状\ "l" :ライン "f" :塗り(デフォルト)\\ -\chuu 位置微調整\ "c":中央 "b":下 "t":トップ(〃)\\ -\chuu 空引数のとき,現在の設定値を表示 - -\tab{Ketinit(\,)}定数をデフォルトに初期化 - -\subsection{空間(平行投影)} - -\tab{Setangle(\,$\theta, \varphi$\,)}角度(°)を指定\\ -\chuu デフォルト値は $\theta$<$- 60,\ \varphi$<$- 30$\\ -\chuu 空引数のとき,現在の設定値を表示 - -\tab{Initangle(\,)}デフォルト値に戻す - -\subsection{空間(一点投影)} - -\tab{Setpers(\,注視点,視点\,)}一点投影のFocusPoint,\ EyePoint を指定\\ -\chuu デフォルト値は FocusPoint$<$- c(0,0,0),\ EyePoint$<$- c(5,5,5) - -\tab{Setpers()}現在のFocusPoint,\ EyePoint を表示\\ -\chuu 空引数のとき,現在の設定値を表示 - -\tab{SetstereoL(\,$R,\ \theta,\ \varphi,\ \varDelta$\,)}% -原点を注視点として,空間極座標により定まる左目の位置を\\ -\tab{}視点にセット($\varDelta$は目の間隔) - -\tab{SetstereoR(\,$R,\ \theta,\ \varphi,\ \varDelta$\,)}% -原点を注視点として,空間極座標により定まる右目の位置を\\ -\tab{}視点にセット($\varDelta$は目の間隔) - -\section{プロットデータの作成} - -\subsection{平面図形} - -\tab{Plotdata(関数,範囲,オプション)}\\ -\tab{}関数のグラフのPDを作成\\ -\rei G1$<$- Plotdata(\,"sin(x)",\ "x= c($-2$*pi,\ 2*pi)")\\ -\chuu 範囲を "x" とすると,XMINからXMAXにとる.\\ -\chuu x 以外の変数を使うときは関数に使われていないかを注意.\\ -\chuu オプション\\ -\hspace*{16zw}\tab[6zw]{"N=$\cdots$"}点の個数\\ -\hspace*{16zw}\tab[6zw]{"E=c($\cdots$)"}除外点のリスト\\ -\hspace*{16zw}\tab[6zw]{"E=関数"}関数の0点は除外\\ -\hspace*{16zw}\tab[6zw]{"D=$\cdots$"}連続限界値(これ以上離れたら結ばない)\\ -\chuu デフォルトはN=50, D=Inf \\ -%\chuu 関数は function で与えてもよい.\\ -\rei G1$<$- Plotdata("1/x", "x","N=200", "E=c(0)", "D=1")\\ -\rei G2$<$- Plotdata("1/((x-1)*(x+2))", "x", "E=(x-1)*(x+2)")\\ - -\tab{Listplot(点のベクトルまたは列またはlist)}\\ -\tab{}折れ線のPDを作成. ただし、点は線分で結ぶ. \\ -\rei G2$<$- Listplot(c(c(3,2),c(5,4)))\\ -\rei G2$<$- Listplot(c(3,2),c(5,4)) - -\tab{Lineplot(点A, 点B\{ , 長さ,半直線\})}\\ -\tab{}線分ABを延長した線分のPDを作成 \\ -\rei G3$<$- Lineplot(c(3,2),c(5,4))\\ -\rei G4$<$- Lineplot(A, B, "+")\\ -\reicr 半直線AB(B側に延長)\\ -\chuu 長さのデフォルトは片側100 - -\tab{Paramplot(パラメトリック関数,範囲,オプション)}\\ -\tab{}パラメトリック関数のグラフのPDを作成\\ -\chuu t 以外の変数を使うときは関数に使われていないかを注意\\ -%\chuu 関数は function で与えてもよい.\\ -\rei G3$<$- Paramplot(\,"c(cos(t),\ sin(t))",\ "t=c(0, 2*\%pi)")\\ -%\rei G4$<$- Paramplot(Fnx, Fny, "t=c(0, 1)") - -\tab{Rotatedata(PDまたは点,角度\{,中心\})}\\ -\tab{}平面のPDを回転したPDを作成 \\ -\rei G4$<$- Rotatedata(G1,pi/4) - -\tab{Translatedata(PD,\ x方向 y方向)}\\ -\tab{}PDを平行移動したPDを作成 \\ -\rei G5$<$- Translatedata(\,G1,\ 3,\ $-1$\,) - -\tab{Scaledata(PD, x方向, y方向\{,中心\})}\\ -\tab{}PDを拡大(縮小)したPDを作成 \\ -\rei G6$<$- Scaledata(\,G1,\ 2,\ 1/3\,) - -\tab{Reflectdata(PD,点)}点対称移動したPDを作成\\ -\tab{Reflectdata(PD, c(\,点1,点2\,))}\\ -\tab{}線対称移動したPDを作成\\ -\rei G7$<$- Reflectdata(\,G1,\ c(0,0)\,)\\ -\rei G8$<$- Reflectdata(\,G1,\ c(\,c(0,0),\ c(0,1)\,)\,) - -\tab{Pointdata(PD,\ $\cdots$)}PDの節点のlistを作成\\ -\rei G9=Pointdata(G1)\\ -\chuu Drwpt(G9)などで,点のプロットができる. - -\tab[21zw]{Circledata(中心,\ 半径\ \{,\ オプション\}\})}円のPDを作成\\ -\rei G10$<$- Circledata(\,c(3,1),\ 2\,) \\ -\chuu オプション\\ -\hspace*{16zw}\tab[5zw]{"R=..."}$\theta$の範囲\\ -\hspace*{16zw}\tab[5zw]{"N=..."}点の個数\\ -\rei G10a$<$- Circledata(\,c(3,1),\ 2,\ "R=c(0,\ pi/2)"\,)\\ -\rei G10b$<$- Circledata(\,c(3,1),\ 2,\ "N=100"\,) - -\tab{\,Framedata(P,\ dx\{,\ dy\})\,}% -点Pを中心に$\pm$dx,\ $\pm$dyの矩形(dyを省略するとdy$<$- dx)\\ -\rei G3$<$- Framedata(c(3,\ 1),\ 0.5\,) - -\tab[12zw]{\,Framedata(${\rm c}(x_1,\ x_2),\ {\rm c}(y_1,\ y_2)$)\,\\}% -\tab{}$x_1 \leqq x \leqq x_2,\ y_1 \leqq y \leqq y_2$の矩形のPDを作成(右上から反時計)\\ -\chuu 引数が空のとき,Setwindowで指定した枠\\ -\rei G1$<$- Framedata(${\rm c}(-2,\ 3)$,\ ${\rm c}(1,\ 4)$\,) \\ -\rei G2$<$- Framedata() - -\tab{Hatchdata( パターン文字(list)\{, 開始点\}, (閉)曲線の列\{,kaku\{,haba\}\,\}\,)}\\ -\tab{}パターンと一致する領域を斜線塗りするPDを作成\\ -\rei G1$<$- Hatchdata(list("io"),\ list(g1,g2),\ list(g3)\,)\\ -\mbox{}\hfill(i : 内部,o: 外部)\\ -\chuu 開始点が指定されたとき\\ -\hfill(仮想的に)その点を通る斜線から描き始める\\ -%\chuu パターンがリストのとき,どれかと一致する領域を斜線塗り\\ -\chuu% -\begin{mini}{23zw} -kakuは斜線の傾き(def=45),habaは間隔(def=1) -\end{mini}\vspace{1mm}\\ -\rei G2$<$- Hatchdata(\,list("ii"),\ O,\ list(G1),\ $-45$,\ 1.5\,)\\ -\chuu 曲線リスト内のPDは隣接の順に指定\\ -\chuu 閉じていないとき\\ -\hspace*{18zw}(1)方向 "s","n","w","e" を指定する\\ -\hspace*{18zw}(2)窓枠とちょうど2点で交わる場合、領域の点を指定\\ -\hspace*{18zw}(3)指定しなければ端点を直線で結ぶ.\\ -\rei G3$<$- Hatchdata(list("ii),\ list(g1,"s"),\ list(g2,\ c(3,0))\,) - -\tab{Hatchdata( 領域の点)\{, 開始点\}, (閉)曲線listの列\{,kaku\{,haba\}\,\}\,)}\\ -\tab{}点(のどれか)が含まれる領域を斜線塗り\\ -\rei F4$<$- Hatchdata(list(A,B,C),\ \ list(G1),\ list(G2,G3)\,)\\ -\hspace*{4zw}\chuu % -\begin{mini}{23zw} -包含パターンが点A, B, Cのどれかと一致する領域を斜線塗り(領域は隣接するものとする) -\end{mini}\vspace{2mm} - -%\tab{enclosing( P, PDリスト )}PD列からPを囲む閉曲線となる部分曲線のPD列を作成\\ -%\rei G1$<$- enclosing(\,c(1,0),\ c(g1,\ g2,\ invert(g3))\,)\\ -%\chuu PD列は隣接順に指定する(向きが一致するようにする) - -%\tab{enclosing( n, PDリスト )}% -%PD列からできる閉曲線のうちn番目のPD列を作成\\ -%\rei G2$<$- enclosing(\,1,\ c(g1,\,g2,\,invert(g3))\,)\\ -%\chuu 0を指定すると,全ての閉曲線のリストを返す. - -\tab{Enclosing( PDリスト\{, 始点の近くの点\} )}\\ -\tab{}PD列の直近の交点を結んで閉曲線を作成\\ -\rei G2$<$- Enclosing(list(G1,\,invert(G2),\,G3),\,c(2,1)\,)\\ -\tab[14zw]{}G1と (最後の)G3の交点のうち,c(2,1)に近い点から始める\\ -\chuu 交点が1個の場合は,点を省略してよい. - -\tab{Dotfilldata( パターン文字列(リスト)\{, 開 始点\}, -(閉)曲線PDリストの列\{,濃さ\})}\\ -\tab{}パターンと一致する領域を点描するPDを作成\\ -\rei Fd$<$- Dotfilldata("ii",list(G1),list(G2),0.7)\\ -\chuu 濃さ$d$は $0< d \leqq 1$(デフォルトは$0.5$)\\ -\chuu 書き出しは,Drwptを用いる. - -\tab{Arrowdata}矢印のPDを作成(Arrowline参照)\\ -\chuu やじりは塗りつぶさず,線データのみ - -\tab{Arrowheaddata}やじりだけのPDを作成(Arrowhead参照) - -\tab[20zw]{Bowdata(\,$\mbox{点A},\ \mbox{点B}$\{,\ 曲がり\{,\ 切り\}\,\}\,)}\\ -\tab{}弓形のPDを作成\\ -\chuu 曲がり:弧の曲がり(デフォルトは1)\\ -\chuu 切り:中央に入れる切りの長さ(デフォルトは0)\\ -\chuu 点AからBに反時計まわりに弧をかく\\ -\rei G$<$- Bowdata(\,c(2,\ 1),\ c(3,\ 4),\ 0.8,\ 0.5\,) - -%\tab{Bowmiddle(\,$\mbox{点A},\ \mbox{点B}$\{,\ 曲がり\})}\\ -%\tab{}弓形の中点と角のlistを返す - -\tab{Bowmiddle(\,弧データ\ )}弓形の中点を返す - -\tab{Splinedata(点データ\{, オプション\}\})}\\ -\tab{}spline曲線のPDを作成\\ -%\chuu ファイルは,space, comma, tab 区切りのtextファイル\\ -%\chuu 開始位置:ファイルの読込み開始行と列.defaultはc(2,\ 1)\\ -\chuu 点データはリストまたはPD\\ -\chuu オプション:\\ -\hspace*{18zw}"N$<$- 点の個数" (デフォルトは50)\\ -\hspace*{18zw}"C" (閉曲線でスムーズにつなぐ)\\ -%\rei Fs$<$- Splinedata("c:/data.txt",\ c(2,4),\ "N$<$- 100")\\ -\rei Fs$<$- Splinedata(PL, "N$<$- 200", "C")(PLは点データ) - -%\tab{Skeleton2data(\,平面曲線list1,平面曲線list2\{,大きさ% -%\{,\ 遠近の閾値\}\}\,)}\\ -%\tab{}list2で隠されるlist1のスケルトンデータを作成 - -\tab{Anglemark(A, B, C \{, サイズ \})}\\ -\tab{}$\angle \mathrm{ABC}$の間の角度記号を作成\\ -\chuu BAからBCへ反時計回りに描く\\ -\chuu サイズのデフォルトは0.5 - -\tab{Paramark(A, B, C \{, サイズ\})}\\ -\tab{}$\angle \mathrm{ABC}$の間の角度記号(平行四辺形)を作成 - -%\tab{Sumfun(\{ 定数項, \}一般項, 添字のリスト,変数の範囲,\{ 点の個数 \})}\\ -%\tab{} $\displaystyle c+\sum_{k= a}^{b}f(x,\ k)$のPDを作成({\bf Scilabに追加})\\ -%\chuu 定数項が0のときは省略できる.\\ -%\chuu 点の個数は "N$<$- 個数" で指定(デフォルトは終わりまで)\\ -%\rei G1$<$- Sumfun(1, "x\verb|^|n/factorial(n)", "n$<$- 1:5", "x$<$- c($-2,\ 2)$") - -%\tab{Implicitplot(関数,x範囲,y範囲\{, 分割数\})}\\ -%\tab{Implicitplot(Zvalue, Xvalue, Yvalue) }\\ -%\tab{}陰関数のPDを作成\\ -%\chuu 分割数のデフォルトは c(50, 50)\\ -%\rei \verb|G1$<$- Implicitplot("x^2+y^2-1","x$<$- c(-1,1)","y$<$- c(-1,1)")| - -%\tab{Deqplot(方程式,x範囲,x0,y0\{, 分割数\})}\\ -%\tab{}微分方程式の解曲線のPDを作成\\ -%\chuu $y"$は y\bq と書く.\\ -%\chuu xの範囲を省略すると,描画範囲全体\\ -%\rei \verb|G1$<$- Deqplot("y|\bq \verb|$<$- y*(1-y)","x",0,0.2,"N$<$- 100")|\\ -%\rei \verb|G2$<$- Deqplot"("y|\bq\bq \verb|$<$- -0.4*y`-3*y","x$<$- c(0,5)",0,c(0,2))| -%\rei \verb|G3$<$- Deqplot("c(x,y)|\bq \verb|$<$- c(x*(1-y),0.3*y*(x-1))",...|\\ -%\reicr \verb| "t$<$- c(0,20)",0,c(1,0.5),"N$<$- 200")| - -% - -\subsection{空間図形} - -\tab{Spaceline(\,空間点のベクトルまたはlist\,)}\\ -\tab{}空間点を結ぶ線分のPD3dを作成\\ -\rei G1$<$- Spaceline(\,c(c(3,\ 2,\ 1),\ c(5,\ 6,\ 6))\,) - -\tab{Spacecurve(\,関数,範囲,オプション\,)}\\ -\tab{}空間曲線のPD3dを作成\\ -\rei G2$<$- Spacecurve( "c(cos(t),\ sin(t),\ t)",\ "t$<$- c(0, 2*\%pi)" ) - -\tab{Rotate3data(PD3, v1, v2\ \{, 中心\})}\\ -\tab{}PD3をv1がv2に重なるように回転したPD3dを作成\\ -\rei G2$<$- Rotate3data(\,G1, c(1, 0, 0), c(1, 2, 3)\,)\\ -\chuu PD3はlistでもよい(この場合はlistを返す) - -\tab{Rotate3datac(PD3, 回転軸, 角度\ \{, 中心\})}\\ -\tab{}PD3を回転軸のまわりに回転したPD3dを作成\\ -\rei G2$<$- Rotate3datac(\,G1, c(0, 0, 1), \%pi/4\,)\\ -\chuu PD3はlistでもよい(この場合はlistを返す) - -\tab{Translata3data(PD3, 移動ベクトルv)}\\ -\tab{}PD3をvだけ移動したPD3dを作成\\ -\rei G2$<$- Translate3datac(\,G1, c(3, 2, 1)\,)\\ -\rei G2$<$- Translate3datac(\,G1, 3, 2, 1\,)\\ -\chuu PD3はlistでもよい(この場合はlistを返す) - -\tab{Xyzax3data(\,$x$範囲, $y$範囲, $z$範囲\,)}\\ -\tab{}座標軸のPD3dのlistを作成 - -\tab{Projpara(\,PD3列またはlist\,)}\\ -\tab{}空間曲線の平行投影による射影PD( 2d )を作成 - -\tab{Projpers(\,PD3列またはlist\,)}\\ -\tab{}空間曲線の一点投影による射影PD( 2d )を作成 - -\tab{Skeletonparadata(\,空間曲線list1,空間曲線list2\{,大きさ% -\{,\ 遠近の閾値\}\}\,)}\\ -\tab{}\begin{mini}{30zw} -平行投影でlist1からlist2により隠される部分を除いた残りの平面PD列 -(スケルトンデータ)を作成\vspace*{2mm} -\end{mini} - -\tab{Skeletonpara3data(\,空間曲線list1,空間曲線list2\{,大きさ% -\{,\ 遠近の閾値\}\}\,)}\\ -\tab{}\begin{mini}{30zw} -平行投影でlist1からlist2により隠される部分を除いた残りの空間PD列 -(スケルトンデータ)を作成\vspace*{2mm} -\end{mini} - -\tab{Skeletonpersdata(\,空間曲線list1,空間曲線list2\{,大きさ% -\{,\ 遠近の閾値\}\}\,)}\\ -\tab{}一点投影でlist2によるlist1のスケルトンデータ(2D)を作成 - -\tab{Skeletonpers3data(\,空間曲線list1,空間曲線list2\{,大きさ% -\{,\ 遠近の閾値\}\}\,)}\\ -\tab{}一点投影でlist2によるlist1のスケルトンデータ(3D)を作成 - -\tab{Embed(\,平面曲線(リスト),埋め込み関数\,)}\\ -\tab{}埋め込み関数により空間曲線を作成\\ -\rei \verb|deff("Out$<$- Fun(x,y)","Out$<$- c(x,y,0)")|\\ -\reicr \verb|G1$<$- Listplot(c(0,0),c(3,2))|\\ -\reicr \verb|G1_3d$<$- Embed(G1,Fun)| - -% -\subsection{多面体の描画} - -\tab{Phcutdata(頂点リストVL, 面添字リストFL, 平面データPlaneD)}\\ -\tab{}多面体を平面で切ったときの多面体と切断面の3dリストを作成\\ -\chuu PlaneD(平面)の形式\\% -\hspace*{18zw}\begin{mini}{20zw} -"a*x+b*y+c*z-d",\ "a*x+b*y+c*z$<$- d"\\ -\hspace*{2zw}(x,\ y,\ zをクリアしておく)\\ -または "c(a, b, c, d)"\\ -\hspace*{4zw} "list(a, b, c, P)"(点Pを通る) -\end{mini}\vspace{2mm}\\ -\chuu 切断面はリストの最後の要素\\ -\rei VL$<$- list(c(0, 0, 0), c(1, 0, 0), c(0, 1, 0), c(0, 0, 1))\\ -\reicr FL$<$- list(c(1, 2, 3), c(1, 2, 4), c(1, 3, 4), c(2, 3, 4))\\ -\reicr PL$<$- Phcutdata(VL, FL, "c(1, 1, 1, 3)")\\ -\reicr Windisp(PL) - -\tab{Phcutoffdata(VL, FL, PlaneD, 符号)}\\ -\tab{}PlaneDで切断された部分多面体の3dデータリストを作成\\ -\chuu 符号は \verb|"+"| または \verb|"-"|\\ -\rei PL$<$- Phpcutoffdata(VL, FL, "x+y+(z-1/2)", "+")\\ -\chuu PhVertexL(), PhFaceL()で頂点,面リストを取り出せる. - -\tab{Phparadata(VL, FL)}陰線処理をした多面体のPD3d(平行投影)を作成\\ -\tab{Phpersdata(VL, FL)}陰線処理をした多面体のPD3d(一点投影)を作成\\ -\chuu PhHiddenData()で陰線のPDを取り出せる. - -\tab{Phsparadata(面datalist)}複数の多面体のPD3d(平行投影)を作成(陰線処理)\\ -\tab{Phspersdata(面datalists)}複数多面体のPD3d(一点投影)を作成(陰線処理)\\ -\chuu 面datalistはlist(VL, FL),または,そのlist\\ -\chuu 面を点で直接指定するときには VL$<$- list()とする.\\ -\rei Fd$<$- list(list(),list(c(3,2,1),c(0,0,0),c(c(1,2,4)))\\ -\chuu PhHiddenData()で陰線のPDを取り出せる. - -\tab{Phsrawparadata(面datalist), Phsrawpersdata(面datalist)}\\ -\tab{}複数の多面体のPD3dを作成(陰線処理をしない) - -\tab{Facesdata(面datalist \{ ,追加曲線PDlist \}, 射影のタイプ)}\\ -\tab{}面の辺(と追加曲線)を面により陰線処理\\ -\chuu 射影のタイプは "para","pers","rawpara’,"rawpers" - -\tab{Faceremovaldata(面datalist,曲線PDlist, 射影のタイプ)}\\ -\tab{}曲線を面により陰線処理 - -\section{データの書き出し} - -\subsection{基本コマンド} - -\tab{Windisp( PD列またはlist )}\\ -\tab{}画面を開き,PD列を表示(確認のため)\\ -\rei Windisp(\,G1,\ G2\,)\\ -\rei Windisp(list(G1,G2)) - -\tab{WindispT( PD列またはlist \{, オプション\} )}\\ -\tab{}画面を開き,PD列を表示(確認のため)図を重ねて表示する.事前にWindispT()\\ -\rei WindispT(\,G1,\ G2\,color="red",width=1,new=TRUE\,)\\ -\rei WindispT(list(col="blue",border="white",G1),new=TRUE) \\ -\hspace*{18zw}(閉曲線G1を塗る)\\ -\rei WindispT(list(col="blue",border="white",density=200,G1,G2),new=TRUE)\\ -\hspace*{18zw} (閉曲線G1,G2を塗る.densityは内側を線分で塗りつぶす場合のパラメータ) - -\tab{Openfile('ファイル名'\,\{ソースファイル名\}) }\\ -\tab{}書き出し用ファイルを開く(デフォルトは画面)\\ -\rei setwd("C:/TeXF") \\ -\reicr Openfile(\, "fig.tex"\,)\\ -\reicr Openfile(\,'fig.tex',\,'fig.r'\,)\\ -\chuu ソースが同一フォルダにあるときは,第2引数は不要 - -\tab{Beginpicture("単位長"\,)}picture 環境を始める.\\ -\rei Beginpicture("1cm"\,)\\ -\rei Beginpicture("2*10/12cm"\,) - -\tab{Endpicture(\,1\,)}picture 環境を終える(座標軸をかく)\\ -\tab{Endpicture(\,0\,)}picture 環境を終える(座標軸をかかない) - -\tab{Closefile(\,)\,}書き出し用ファイルを閉じる(デフォルト=画面に戻す) - -\subsection{プロットデータ} - -\tab{Drwline(\,PD列またはlist\{, 太さ\}\,)}\\ -\tab{}PD列またはを実線で書き出す\\ -\rei Drwline(\,G1,\ G2\,)\\ -\rei Drwline(\,G3,\ 0.5\.) - -\tab{Dashline(\,PD列またはlist\{, len \{, gap\}\,\}\,)}\\ -\tab{}PD列またはlistを破線で書き出す(実線部から始まる)\\ -\rei Dashline(\,G1,\ G2\,)\\ -\rei Dashline(\,G1,\ 1.5\,)\hfill(実線部,ギャップとも 1.5倍)\\ -\rei Dashline(\,G1,\ G2,\ 1.5,\ 0.5\,)\\ -\hfill(実線部 1.5倍,ギャップ 0.5倍) - -\tab{Invdashline(\,PD列またはlist\{, len\{, gap\}\,\}\ )}\\ -\tab{}破線を書き出す(ギャップから始まる) - -\tab{Dottedline(\,PD列またはlist\{, len \{, size\}\,\}\,)}\\ -\tab{}点線を書き出す\\ -\rei Dottedline(\,G1,\ G2\,)\\ -\rei Dottedline(\,G1,\ 1.5\,) (間隔 1.5倍)\\ -\rei Dottedline(\,G1,\ G2,\ 1,\ 0.5\,)(点の大きさ 0.5倍) - -\tab{Arrowline(\,A, B \{, 鏃の大きさ \{, 開き角 \{, 鏃位置 \{, 太さ\}\,\}\,\} \{, \\ -\hspace*{20zw}形と位置 -,\ "Cut=切り込み率"\}\,\}\,)}\\ - -\tab{}点AからBに向けて矢印をかくコードを書き出す\\ -\rei Arrowline(\,A,\ B\,)\\ -\rei Arrowline(\,A,\ B,\ 2,\ 10,"l"\,)\\ -\rei Arrowline(\,A,\ B,\ 1,\ 18,\ 0.5,\ 2,"lc"\,)\\ -\hspace*{6zw}\chuu ABの中点の位置に鏃をかく - - -\tab{Arrowhead(\,位置,\ 方向\{,\ 大きさ\{,\ 角度\},\ 形状と位置,\ "Cut=切り込み率"\}\,)} - -\tab{}鏃だけを書き出す\\ -\rei Arrowhead(\,c(0,\ 0),\ c(2,\ 1),\ "cl"\,) - -\tab{Arrowhead(\,P,\ PD\{,\ 大きさ\{,\ 角度\},\ 形状と位置\}\,)}\\ -\tab{}PD上の点Pに矢印を描く\\ -\rei Arrowhead(\,c(1,\ 1),\ Plotdata("x\^{}2","x"\,))\\ -\chuu 鏃はライン - -\tab{Drwpt(点の列 \{, 塗り\})}点を書き出す(大きさは Setptで指定,塗りのデフォルトは1)\\ -\rei Drwpt(\,c(2,\ 3),\ c(5,\ 7)\,) - -\tab{Drwxy(\,)}座標軸を書き出す - -\tab{Htickmark( 座標, 方向, 数式 , $\cdots$ )}\\ -\tab{}横軸上に目盛りをつける(方向のデフォルトは"s"\,) - -\tab{Vtickmark( 座標, 方向, 数式 , $\cdots$ )}\\ -\tab{}縦軸上に目盛りをつける(方向のデフォルトは"w"\,)\\ -\rei Htickmark(\,$-1$,"$-1$",\ 1,"1",\ pi,"$\backslash$pi"\,)\\ -\rei Vtickmark(\ $-1$,"e","$-1$",\ 1,"ne","1"\,)\\ -\rei Htickmark(c(2,1),\ "a"\,)\\ -\chuu 数式を省略すると目盛りだけをつける - -\tab{Htickmark("m..n..r..")}横軸全体に目盛りをつける - -\tab{Vtickmark("m..n..r.."\,)}縦軸全体に目盛りをつける\\ -\chuu m(目盛りの間隔),n(文字を何目盛り毎に),r(数の倍率)\\ -\rei Htickmark("mn")(目盛りと数を1間隔でつける)\\ -\rei Vtickmark("m1n2r1.5")(1.5倍した数を1つとびに) - -\tab[13zw]{Shade(\,PD列またはlist\{, 濃さ\}\,)\mbox{}}\\ -\tab{}閉曲線の内部を塗りつぶし 濃さ: 0 〜 1(デフォルトは1) - -\subsection{文字の書き入れ} - -\tab{Letter(\ 点, 方向, 文字列 ,・・・)}\\ -\tab{}点の位置の「方向」に文字列をかく(複数可)\\ -\rei Letter(\,c(4,\ 3),"n","文字")\\ -\chuu 位置は"n", "s", "e", "w", "ne", "nw", "se", "sw", "c"\\ -\chuu "n1" nの方向にさらに1目盛長だけ離す.\\ -\chuu "s-1w2" s方向に-1目盛長,w方向に2目盛長だけ離す. - -\tab{Expr(\ 点, 方向, 数式,・・・)}点の位置の「方向」に数式をかく(\$\$は不要)\\ -\rei Expr(c(4, 3),"s","y=f(x)") - -\tab{Letterrot(\ 点, 方向\ \{, 接線方向\ \{, 法線方向\}\}, 文字列)}\\ -\tab{Exprrot(\ 点, 方向\ \{, 接線方向\ \{, 法線方向\}\}, 文字列)}\\ -\tab{}「点」の位置に「方向」を右横方向にするように文字を傾けて書く\\ -\chuu 「接線方向」,「法線方向」はそれぞれの微少移動量\\ -\chuu graphicxパッケージが必要 - -\tab{Texletter(\ 点(list形式), 方向, 文字列 ,・・・)}\\ -\tab{}点の位置の「方向」に文字列をかく(複数可)\\ -\rei Texletter(\,list(4,,\ "\#1"),"n","文字")\\ -\chuu 位置は"n", "s", "e", "w", "ne", "nw", "se", "sw", "c"\\ -\chuu 点の位置はリスト形式で,\TeX の文字列を渡すことができる. - -\tab{Openphr(\,ユーザーコマンド名\,),Closephr(\,)}\\ -\tab{}$\backslash$defのコマンド定義\\ -\rei Openphr("$\backslash$p"\,)\\ -\reicr Texcom("$\backslash$begin\{array\}\{cc\}"\,)\\ -\reicr Texcom("5 \& 3$\backslash\backslash$"\,)\\ -\reicr Texcom("8 \& 7"\,)\\ -\reicr Texcom("$\backslash$end\{array\}\$"\,)\\ -\reicr Closephr(\,) - -\tab{Openpar(\,ユーザーコマンド名,幅 \{ 縦方向 \}\,), Closepar(\,)}\\ -\tab{}minipage環境を含む$\backslash$def コマンド定義\\ -\rei Openpar("$\backslash$s","5cm", "t"\,)\\ -\reicr Texcom("$\backslash$input\{rei\}"\,)\\ -\reicr Closepar(\,)\\ -\reicr Letter(\,c(2,\ 3),"se","$\backslash$s"\,)\\ -\chuu 縦方向のデフォルトは c - -\tab{Fontsize("記号"\,)}文字サイズの変更コマンドを書き出す\\ -\tab[13zw]{}"n", "s", "f",% - "ss", "t", \\ -\tab[13zw]{}"la", "La", % -"LA", "h", "H"(""\,のとき"n"\,)\\ -\rei Fontsize("s") - -\tab{Texcom("コマンド"\,)}\TeX コマンドのコードを書き出す\\ -\rei Texcom("$\backslash$newcounter\{tmpct\}")\\ -\chuu "newline" のとき,空白行を挿入 - -\tab{Bowname(弓形,数式 )}弓形PDの中央に式を書き入れる\\ -\rei Gb$<$- Bowdata( A, B, 1, 0.5)\\ -\reicr Bowname(Gb, "d") - -\tab{Bownamerot( 弓形,数式\{,向き\} )}\\ -\tab{}弓形PDの中央に式を傾けて書き入れる\\ -\chuu graphicxパッケージが必要\\ -\chuu 向きに $-1$を指定すると向きが反対になる - -\tab{Xyzaxparaname(\,軸データ \{, 各軸のラベル名 \}\{,離れ\}\,)}\\ -\tab{}平行投影で,各軸のラベルを書き入れる\\ -\rei Gax$<$- Xyzax3data( "x$<$- c(0,1)", "y$<$- c(0,1)", "z$<$- c(0,2)" )\\% ($x,y,z$を書く)\\ -\reicr Xyzaxparaname(Gax)\\% ($x,y,z$を書く)\\ -\chuu "\yen sin x" など文字列で指定することもできる - -\tab{Xyzaxpersname(\,軸データ \{, 各軸のラベル名 \}\{,離れ\}\,)}\\ -\tab{}一点投影で,各軸のラベルを書き入れる\\ -\rei Xyzaxpersname(Gax, "", "", "w") - -%\vspace*{-0.5zw} - -%\vspace*{-2zw} - -\section{プロットデータの操作} - -\subsection{平面} - -\tab{Joingraphics(PD1,PD2,・・・\{ , "L" \})}\\ -\tab{}複数のPDを1つのPDに合併 \\ -\reicr G11$<$- Joingraphics(\,F9,\ G10\,)\\ -\chuu "L"を指定したときは,結果をリストで返す - -\tab{Dividegraphics(PD)}PDを要素に分けたlistを作成\\ -\rei FL$<$- Dividegraphics(G1)\\ -\rei G1$<$- Op(1, FL) - -\tab{Joincrvs(\,PD列\,)}複数の曲線をつなげたPDを作成(2D, 3D共通)\\ -\rei G3$<$- Joincrvs(\,G1,\ Invert(G2)\,)\\ -\chuu 曲線は隣接する順番で指定する - -\tab{Invert( PD )}PDの点列を逆順にしたPDを作成(2D, 3D共通) - -%\tab{connectseg(PD)}細切れの線分を結ぶPDリストを作成\\ -%\hspace*{-4zw}\rei connectseg(implicitplot(x\textasciicircum 2+y\textasciicircum 2$<$- 1,x$<$- -2..2,y$<$- -2..2)) - -\tab{Partcrv(\,s1,\ s2, PD\,)}曲線PD上のパラメータ値s1, s2を両端とするPDを作成\\ -\chuu s1 $>$ s2 の場合\\ -\hspace*{180pt}s2から終点,始点からs1までのPDのリストを出力\\ -\hspace*{180pt}PDが閉曲線のときは上の2つのPDをつなげる. - -\tab{Partcrv(\,A, B, PD\,)}曲線PD上の点A, Bの間の部分曲線のPDを作成\\ -\chuu -\begin{mini}{23zw}% -A, Bの順序が逆転しているとき,Bから終点,始点からAまでのPDのリスト(閉のとき接続)を出力 -\end{mini}\vspace{2mm}\\ -\rei G1$<$- Plotdata(\,"x\textasciicircum 2",\ "x=c(XMIN, XMAX)"\,)\\ -\reicr G2$<$- Partcrv(\,c(0,0),\ c(1,1),\ G1)\\ -\reicr G3$<$- Partcrv(\,c(1,1),\ c(0,0),\ G1) - - -\tab{Intersectcrvs(PD1, PD2)}2曲線PD1, PD2の交点リストを作成\\ -\rei G1$<$- Paramplot("c(cos(t),\ sin(t))",\ "t=c(0, 2*\%pi)")\\ -\reicr G2$<$- Plotdata("x+1/2",\ "x")\\ -\reicr PL$<$- Intersectcrvs(\,G1,G2\,) - -\tab{IntersectcrvsPp(PD1, PD2)}\\ -\tab{}2曲線PD1, PD2の交点とパラメータのリストを作成 - -\tab{Intersectlines(L1, L2)}2直線の交点を返す\\ -\rei L1$<$- Lineplot(A, B)\\ -\reicr L2$<$- Lineplot(C, D)\\ -\reicr P$<$- Intersectcrvs(\,L1,L2\,) - -\tab{Nearestpt(\ P, PD\ )}点Pに最も近い曲線PD上の点とパラメータ値のリストを返す\\ -\rei Pp$<$- Nearestpt(\,c(0,\ 1),\ G1\,)\\ -\reicr A$<$- Op(1,Pp) - -\tab{Nearestpt(\,PD1,\ PD2\,)}% -PD1の節点のうち、PD2に最も近い点データのリストを返す\\ -\rei Pp$<$- Nearestpt(\,G1,\ G2)\\ -\reicr A$<$- Op(1,Pp) - -\tab{Ptstart(\,PD\,), Ptend(\,PD)\,}曲線PDの始点(終点)を返す - - -%\tab{Ptlistcrv(\,PD)\,}曲線PDの節点データリストを返す - -\tab{Numptcrv(\,PD)\,}曲線PDの節点データの個数を返す - -\tab{Ptcrv(\,n,\,PD)\,}曲線PDのn番目の節点を返す - -\tab{Pointoncrv(\,s,\ PD\,)}PD上の点でパラメータ値sをもつ点を返す\\ -\rei Pointoncrv(5.3,\ G1)\\ -\reicr (5番目の線分上で0.3の位置にある点) - -\tab[13zw]{Paramoncrv(P \{,\ n \},\ PD)}% -PD(のn番目の線分)上にある点Pのパラメータを返す\\ -\rei Paramoncrv( c(3,\ 2), G1)\\ -\rei Paramoncrv(c(2,\ 4), 5, G1) - -%\tab[13zw]{Droppoint(PD \{, 限界値\})} 限界値以下の隣接点を落として点を少なくする.\\ -%\chuu 限界値のデフォルト値は0.02 - -%\tab{Powersum(\,係数リスト(list), 変数値x \{, 中心c\} \,)}\\ -%\tab{}$\displaystyle \sum_{k= 0}^n a_n (x-c)^k$の値を返す.(Plotdataで使用)\\ -%\chuu 係数リストは list( 添字リスト,係数リスト)の形\\ -%\rei Tmp1$<$- 0:20\\ -%\reicr Tmp2$<$- ones(length(Tmp1))./factorial(Tmp1)\\ -%\reicr CL$<$- list(Tmp1, Tmp2)\\ -%\reicr G1$<$- Plotdata( "Powersum( CL, x)", "x") - -%\tab{FouriercoeffL(関数F, 周期T, 項数N )}\\ -%\tab{}FのN項までのフーリエ係数リスト(list)を求める.\\ -%\chuu list( 定数項, 余弦係数(行), 正弦係数(行), 周期 ) の形\\ -%\chuu Fouriersumで用いる. - -%\tab{Fouriersum( フーリエ係数リスト, 変数値)}\\ -%\tab{}フーリエ級数の値を返す.(Plotdataで使用)\\ -%\rei deff( "Out$<$- Fun(x)", "Out$<$- abs(x)")\\ -%\reicr CL$<$- FouriercoeffL(Fun, 2, 30)\\ -%\reicr G2$<$- Plotdata("Fouriersum(CL, x)", "x", "N$<$- 300" ) - -\subsection{空間} - -\tab{Partcrv3(\,S1,\ S2, PD\,)}曲線PD上のパラメータ値S1,S2を両端とするPDを作成 - -\tab{Rotate3pt(点, V1, V2\{, C\})}\\ -\tab{}回転移動した点を返す(Rotate3data参照) - -\tab{Rotate3ptc(点, 軸, 角度\{, C\})}\\ -\tab{}回転移動した点を返す(Rotate3data参照) - - -\tab{Parapt(\,点\,)\ ,\ \ Perspt(\,点\,)}\\ -\tab{}空間の点を投影した点を返す - -\tab{Zparapt(\,点\,)\ ,\ \ Zperspt(\,点\,)}\\ -\tab{}投影した平面を$X,\ Y$としたときの$Z$座標 - -\tab{Invparapt(\,P,\ PD3d\,)\ ,\ \ Invperspt(\,P,\ PD3d\,)}\\ -\tab{}PD3dを投影したPD上の点Pに対応するPD3d上の点\\ -\chuu Pd3dが線分のときは,延長線上の点でもよい. - -\tab{Invperspt(\,s,\ PD2d,\ PD3d\,)\ ,\ \ Invperspt(\,s,\ PD2d,\ PD3d\,)}\\ -\tab{}PD2d上のパラメータ値sの点に対応するPD3d上の点 - -\tab{Cancoordpers(\,投影座標\,)}平行投影で「投影座標」で表される点の標準座標 - -\tab{Cancoordpers(\,投影座標\,)}一点投影で「投影座標」で表される点の標準座標 - -\tab{Viewfrom(Vec, 曲線3D \{, 非表示オプション\})}\\ -\tab{}一時的にVec方向からみた射影データを返す\\ -\rei Out1$<$- Viewfrom(c(0,0,1), G1) (表示してデータを作成)\\ -\rei Out1$<$- Viewfrom(c(0,0,1), G1, 0) (データのみを作成) - - -%\section{曲面の描画} - -%% -%\subsection{関数データリストの定義} - -%\begin{enumerate}[\hspace*{1zw}(1)] -%\item -%$z$<$- f(x,\ y)\ \ (a \leqq x \leqq b,\ c \leqq y \leqq d)$のとき\vspace{1mm}\\ -%\hspace*{4zw}list(\,関数,\ xの範囲,\ yの範囲\,)\\ -%\hspace*{-6zw}\reicr \verb|Fd$<$- list("z$<$- x^2+y","x$<$- c(-1,2)","y$<$- c(-2,1)")|\\ -%\hspace*{-4zw}\chuu 変数名 x, y が関数名にある文字と重ならないようにする. - -%\item -%$z$<$- f(x,\ y)\ ,x$<$- x(u,\ v),\ ,y$<$- y(u,\ v)\ \ (a \leqq u \leqq b,\ c \leqq v \leqq d)$のとき\vspace{1mm}\\ -%\hspace*{4zw}list(\,関数z,\ 関数x,\ 関数y,\ uの範囲,\ vの範囲\{,\ 境界の指定\}\,)\\ -%\hspace*{-6zw}\rei \verb|Fd$<$- list("z$<$- sin(2*sqrt(abs(x^2+y^2))","x$<$- R*cos(T)",|\\ -%\hspace*{-6zw}\reicr \verb| "y$<$- R*sin(T)","R$<$- c(0,4)","T$<$- c(0,2*%pi)","e")|\\ -%\hspace*{-4zw}\chuu "e"は$r$<$- 1,\ 0\leqq t\leqq 2\pi$で定まる閉曲線を表す.\\ -%\hspace*{-4zw}\chuu sqrtの中はabsをつける(計算誤差のため). - -%\item -%$x$<$- x(u,\ v),\ y$<$- y(u,\ v),\ z$<$- z(u,\ v)\ (a \leqq u \leqq b,\ c \leqq v \leqq d)$のとき\\ -%\hspace*{4zw}list(\,"p",\ 関数x\ 関数y,\ 関数z,\ Uの範囲,\ Vの範囲\{,\ 境界の指定\}\,)\\ -%\hspace*{-6zw}\rei \verb|Fd$<$- list("p","x$<$- sin(U)*cos(V)","y$<$- sin(U)*sin(V)",|\\ -%\hspace*{-6zw}\reicr \verb| "z$<$- cos(U)","U$<$- c(0,%pi)","V$<$- c(0,2*%pi),"")| - -%\end{enumerate} - -%\subsection{曲面のワイヤーフレーム図} - -%\tab{Sf3data(FD,\ \{,曲線の点の個数(リスト)\{,横方向の分割数,縦方向の分割数\}\})}\\ -%\tab{}曲面データリストFDの3次元ワイヤフレームデータを生成\\ -%\chuu デフォルトは 点の個数=c(50,\ 50),分割数$<$- 25\\ -%\chuu 点の個数を数nで指定したときは2方向ともnになる\\ -%\rei Out$<$- Sf3data(Fd) - -%\tab{Sfparadata(〃)}FDのワイヤフレームデータを平行投影した2次元データ - -%\tab{Sfpersdata(〃)}FDのワイヤフレームデータを平行投影した2次元データ - -%\subsection{輪郭線データの作成} - -%\tab{Sfbdparadata(関数データ\{,各方向の分割数,限界値1,限界値2\})}\\ -%\tab{Sfbdpersdata(関数データ\{,各方向の分割数,限界値1,限界値2\})} - -%\noindent -%\hspace*{3zw}\Ltab{10zw}{各方向の分割数}曲線,陰関数のグリッド数\\ -%\hspace*{3zw}\Ltab{14zw}{}デフォルトは50\\ -%\hspace*{3zw}\Ltab{10zw}{}リストか単独の数で与える\\ -%\hspace*{3zw}\Ltab{10zw}{限界値1}同一点と見なす限界(デフォルトは0.05)\\ -%\hspace*{3zw}\Ltab{10zw}{限界値2}交点の余裕幅(デフォルトは0.2) - -% -%\rei \verb|Out1$<$- Sfbdparadata(Fd,c(50,50))|\\ -%\reicr \verb| Windisp(Projpara(Out1))| - -%\noindent -%\chuu 曲面上の3次元データとして得られる.\\ -%\chuu BorderHiddenData()で -%陰線の3次元データが得られる.\\ -%\chuu CuspData()で輪郭線の3次元データが -%得られる.\\ -%\chuu CuspPt()でcusp点の2次元データが -%得られる.\\ -%\chuu BorderPt()で輪郭線の交点の2次元データが -%得られる. - -%\subsection{ワイヤーデータの作成} - -%\tab{Wireparadata(輪郭のリスト,関数データ,横の線数,縦の線数\{.分割数, 限界値1.限界値2\})} - -%\tab{Wirepersdata(輪郭,関数データ \{ ,横の線数,縦の線数\{.分割数, 限界値1.限界値2\}\})} - -%\noindent -%\hspace*{3zw}\Ltab{10zw}{輪郭}Sfbdpersdata( Sfbdparadata ) で作成したデータ\\ -%\hspace*{3zw}\Ltab{10zw}{線}個数か値のリストで与える\\ -%\hspace*{3zw}\Ltab{10zw}{限界値1}デフォルトは0.05\\ -%\hspace*{3zw}\Ltab{10zw}{限界値2}デフォルトは0.2 - -% -%\rei \verb|Out2$<$- Wireparadata(Out1,Fd1,5,5)|\\ -%\reicr \verb| Windisp(Projpara(Out1,Out2))|\\ -%\chuu WireHiddenData()で -%陰線の3次元データが得られる.\\ -%\chuu WirePt()で輪郭線との交点の2次元データが -%得られる. - -%\subsection{曲面と曲線} - -%\subsubsection{パラメータ平面上の曲線} - -%\tab{Crvonsfparadata(平面上の曲線2Dデータ,輪郭,関数データ \{,オプション\})} - -%\tab{Crvonsfpersdata(平面上の曲線2Dデータ,輪郭,関数データ \{,オプション\})} - -%\rei \verb|Fg$<$- Parametricplot("c(T, 0)","T$<$- c(0,2*\%pi)")|\\ -%\reicr \verb| Out4$<$- Crvonsfpersdata(Fg,Out1,Fd)|\\ -%\chuu CrvonsfHiddenData()で陰線の3次元データが得られる. - -% -%\subsubsection{曲面上の曲線} - -%\tab{Crv3onsfparadata(曲面上の曲線3Dデータ,輪郭,関数データ\{,オプション\})} - -%\tab{Crv3onsfpersdata(曲面上の曲線3Dデータ,輪郭,関数データ \{,オプション\})} - -%\rei \verb|Out5$<$- Crv3onsfparadata(Fg,Out1,Fd)|\\ -%\chuu Crv3onsfHiddenData()で陰線の3次元データが得られる. - -%\subsubsection{曲面外の曲線} - -%\tab{Crvsfparadata(曲線3D,輪郭,関数データ\{,オプション\})} - -%\tab{Crvsfpersdata(曲線3D,輪郭,関数データ \{,オプション\})} - -%\rei \verb|G2$<$- Xyzax3data("x$<$- c(-5,5)","y$<$- c(-5,5)",...|\\ -%\reicr \verb| "z$<$- c(-5,5)")|\\ -%\reicr \verb| Out2$<$- Crvsfparadata(G2,Out1,Fd)|\\ -%\chuu CrvsfHiddenData()で陰線の3次元データが得られる.\\ -%\chuu 曲線と曲面が交わらないときは,引数の最後に $-1$をつける. - -%\subsubsection{その他のコマンド} - -%\tab{Intersectcrvsf(曲線3D, 関数データ\{,分割数\{,限界値\}\})}\\ -%\tab{}曲線と曲面との交点(MD)を求める. - -%\subsection{曲面の切断} - -%%\tab{polarcoordx()}極座標$r,\ t$の$x$座標を与える関数を返す - -%%\tab{polarcoordx()}極座標$r,\ t$の$x$座標を与える関数を返す - -%\tab{Sfcutdata(曲面データ, 切断面データ \{, 分割数\} )}\\ -%\tab{}曲面を切ったときの切り口の3dデータを作成\\ -%\chuu 切断面は,$x,\ y,\ z$などの方程式で与える.\\ -%\hspace*{15zw}(平面の場合は,Phcutdataのように与えてもよい)\\ -%\rei \verb|Fd$<$- c("p","R*cos(T)","R*sin(T)","2*(1-R)",|\\ -%\reicr \verb| "R$<$- c(0,1)","T$<$- c(0,2*%pi)","se")|\\ -%\reicr \verb|Out$<$- Sfcutdata(Fd,"x^2+(z-1/2)^2$<$- 1/4")| - -%\tab{Sfcutoffparadata(関数データ, 切断面, 符号 \{ , 分割数\} )} - -%\tab{Sfcutoffrawparadata(関数データ, 切断面, 符号 \{ , 分割数\} )} - -%\tab{Sfcutoffpersdata(関数データ, 切断面, 符号 \{ , 分割数\} )} - -%\tab{Sfcutoffrawpersdata(関数データ, 切断面, 符号 \{ , 分割数\} )} - -%\tab{}切断面で切った曲面をリッジライン法で返す - -% -%\rei \verb|Fd$<$- list("z$<$- 2*(1-sqrt(abs(x^2+y^2)))","x$<$- R*cos(T)",|\\ -%\reicr \verb| "y$<$- R*sin(T)","R$<$- c(0,1)","T$<$- c(0,2*%pi)","e")|\\ -%\reicr \verb| Out$<$- Sfcutoffparadata(Fd,"z$<$- 1+2*x","-")| - - -\section{その他} - -%\tab{bksl("コマンド}\,)}コマンドに$\backslash$をつけた文字列を作る\\ -%\rei str$<$- bksl("sin x}\,) - -\tab{Readtextdata(ファイル名,\{開始位置\{,オプション\}\})}\\ -\tab{}% -\begin{mini}{30zw} -ファイルからコンマ,スペース,タブ区切りのテキストを読込み, -データ行列を返す\vspace{2mm} -\end{mini}\\ -\chuu オプション:\\ -\hspace*{18zw}"R=読み込み行数" (デフォルトはすべて)\\ -\hspace*{18zw}"C=読み込み列数"(デフォルトはすべて) \\ -\hspace*{18zw}"Cna=論理値" 1行を列名にするか(デフォルトTRUE) \\ -\hspace*{18zw}"Rna=論理値" 1列を行名にするか(デフォルトFALSE) \\ -\rei DL$<$- Readtextdata("dt.csv",\ c(2,\ 1),\ "R=1000",\ "C=2") - -\tab{Writetextdata(データフレーム,ファイル名)}\\ -\tab{}データフレームを .csvファイルに書き出す\\ -\chuu 列名は1行目におき,NAはblankにする\\ -\rei Writetextdata(Df, "ex.csv") - -\tab{Tonumeric(\,文字列からなるデータ行列 \{, 開始位置 \{ , 終了位置\}\}\.)}\\ -\tab{}行列の成分を数値に変換(変換できる行と列からなる部分行列)\\ -\rei Dn$<$- Tonumeric(DL) - -%\tab{Newlength(\,)}% -%\begin{mini}{30zw} -%距離変数 \verb+ \Width, \Height, \Depth +を定義する\TeX コマンドを画面に表示 -%\end{mini} -%\\ -%\rei \prompt newlength()+\\ -%\hspace*{6zw}\reicr \verb+\newlength{\Width}+\\% -%\hspace*{6zw}\reicr \verb+\newlength{\Height}+\\% -%\hspace*{6zw}\reicr \verb+\newlength{\Depth}+% - -%\tab{Mawarikomi("幅"\,)}% -%\begin{mini}{28zw} -%emathのmawarikomi環境のコードを生成表示 -%\end{mini}\\ -%\rei Mawarikomi("5cm"\,) - -\subsection{作表} - -\tab{Tabledata(\{大きさ,\}\ 縦線相対幅,\ 横線相対高さ\,)}\\% -\tab{}表のデータlistを返す\\ -\tab{}\hspace{-2zw}戻り値:PD,縦線添字,横線添字,枠縦PD,枠横PD,外枠PD\\ -\hspace*{10zw}大きさは次のベクトル\\ -\hspace*{12zw}横,縦(,\ 左margin,\ 右margin(,\ 上margin,\ 下margin))\\ -\chuu 横(縦)を -1 としたときは,縦(横)線のデータから\\ -\hspace*{16.3zw}自動的に計算される(デフォルト)\\ -\hspace*{10zw}縦線相対位置は左の罫線からの幅list(縦方向の始点,終点)\\ -\hspace*{10zw}横線相対位置は上の罫線からの幅list(横方向の始点,終点)\\ -\chuu 描画領域は自動的に設定される - -\rei Tmp1$<$- list(20, 30,list(30,0,10), list(0,15,20), 40)\\ -\reicr Tmp2$<$- list(15)\\ -\reicr Out$<$- Tabledata(c(150,20),Tmp1,Tmp)\\ -\reicr Tb$<$- Tabledata(Tmp1,Tmp2) - -\tab{Dividetable(表データ)}枠,縦罫線,横罫線を成分とするリストを返す\\ -\rei G$<$- Dividetable(Tb)(G[[1]],G[[2]],G[[3]]が枠,縦,横) - -\tab{Partframe(表データ,\ 開始位置,終了位置)}\\ -\tab{}枠の一部のPD\\ -\chuu 位置はそれぞれ,c(列番号,\ 行番号)\\ -\chuu 開始位置から終了位置までの反時計回りのPD\\ -\rei G$<$- Parframe(Tb,\ c(4,1),c(1,2)) - -\tab{Findcell(表データ,\ 列番号,\ 行番号\,)}\\% -\tab{}セルの情報list(中心,横幅/2,縦幅/2)を返す\\ -\chuu 番号は左上の位置\\ -\rei Out$<$- Findcell(Out,2,1)\\ -\chuu 番号がベクトルのときは,その範囲のセル\\ -\rei Out$<$- Findcell(Out,c(2,4),1)\\ -\chuu 番号がベクトルのときは,その範囲のセル\\ -\rei Out$<$- Findcell(Out,c(2,4),1)\\ -\tab{Findcell(表データ,\ 左セル,\{ 右セル\} )}\\ -\rei Out$<$- Findcell(Out,"A2") - -\tab{Diagcelldata(表データ,列番号,行番号)}\\ -\tab{}セルの対角線PDのリストを返す - -\tab{Putcell(表データ,\ 列番号,\ 行番号,\ 位置,\ 文字データ)}\\% -\tab{}セルに文字列を入れるコードを出力\\ -\chuu 位置は"c", "r", "l", "u", "d", "b" \\ -\chuu u : up , d : down, b : baseline (微小移動量を付加できる)\\ -\rei Putcell(Out,2,1,"c","221")\\ -\rei Putcell(Out,"B3","l","\$ab\$") - -\tab{Putrow(表データ,\ 行番号,\ 文字データの列)}\\% -\tab{}1行に順に文字を書き入れる\\ -\rei Putrow(TbL, 2, "a", "b", "c" )\\ -\chuu デフォルト位置は "c" それ以外のときはlist内で指定\\ -\chuu 複数列にわたるときは,列数を list 内で指定\\ -\rei Putrow(TbL, 2, list("r","a"), list(2, "b"), "c")\\ -\hspace*{20zw}(rの位置にa,2列とってbをおく) - -\tab{Putrowexpr(表データ,\ 行番号,\ 文字位置,\ 文字データの列)}\\% -\tab{}1行に順に数式を書き入れる - -\tab{PutcoL(表データ,\ 列番号(名前)(,\ 文字データの列)}\\% -\tab{}1列に順に文字を書き入れる\\ -\rei PutcoL(TbL, "C", "a", "b", "c" ) - -\tab{PutcoLexpr(表データ,\ 列番号(名前),\ 文字位置,文字データの列}\\% -\tab{}1列に順に数式を書き入れる - -\tab{Putrowstr(表データ,\ 行番号,文字位置,文字列}\\% -\tab{}1行に文字列の文字を1つずつ書き入れる\\ -\rei Putrowstr(TbL, 1, "c", "xyz" ) - -\tab{PutcoL(表データ,\ 列番号(名前),文字位置,文字列}\\% -\tab{}1列に文字列の文字を1つずつ書き入れる - -\subsection{\TeX のコマンド書き出し(メタコマンド)} - -\tab{Texcom("コマンド"\,)}\TeX コマンドのコードを書き出す\\ -\rei Texcom("$\backslash\backslash$begin\{minipage\}\{3cm\}")\\ -\chuu "newline" のとき,空白行を挿入 - - -\tab{Openphr(\,ユーザーコマンド名\,),Closephr(\,)}\\ -\tab{}$\backslash$defのコマンド定義を始める\\ -\rei Openphr("$\backslash\backslash$p"\,)\\ -\reicr Texcom("$\backslash\backslash$begin\{array\}\{cc\}"\,)\\ -\reicr Texcom("5 \& 3$\backslash\backslash\backslash\backslash$"\,)\\ -\reicr Texcom("8 \& 7"\,)\\ -\reicr Texcom("$\backslash$end\{array\}\$"\,)\\ -\reicr Closephr(\,) - -\tab{Openpar(\,ユーザーコマンド名,幅\ \{,\ 位置 \}\,), Closepar(\,)}\\ -\tab{}minipage環境を含む$\backslash$def コマンド定義を始める\\ -\chuu 位置のデフォルトは "c"\\ -\rei Openpar("$\backslash\backslash$s","5cm"\,)\\ -\reicr Texcom("$\backslash\backslash$input\{rei\}"\,)\\ -\reicr Closepar(\,)\\ -\reicr Letter(\,c([2,3),"se","$\backslash\backslash$s"\,) - -\tab{Texletter(\ 点(list形式), 方向, 文字列 ,・・・)}\\ -\tab{}点の位置の「方向」に文字列をかく(複数可)\\ -\rei Texletter(\,list(4,"\#1"),"n","文字")\\ -\chuu 位置は"n", s", "e", "w", "ne", "nw", "se", "sw", "c"\\ -\chuu 点の位置はリスト形式で,\TeX の形式で渡すことができる. - -\tab{Texnewctr(番号または番号のベクトル)}\\ -\tab{}\ketpic で使うカウンタ(ketpicctra,...)を定義 - -\tab{Texctr(番号またはカウンタ名)}\\ -\tab{}番号のカウンタ名またはカウンタ名を返す - -\tab{Texthectr(番号)} \verb|\|the+カウンタ名の文字列を返す - -\tab{Texvalctr(番号)} \verb|\|value\{カウンタ名\}の文字列を返す - -\tab{Texsetctr(番号,文字列)}カウンタに値をセットする\TeX コマンド列を出力\\ -\rei Texsetctr(2, "1*2/3");\\ -\rei Texsetctr(2, "(-\verb|#|1)+2"); - -\tab{Texletter(位置(list),方向,文字列)}\\ -\tab{}位置listで表される点に文字列をかく\TeX コマンド列を出力\\ -\rei Texletter(list(10,paste("-",Texvctr(2),sep="")),"ne","\verb|\|content");\\ -\rei Texletter(list(0, "\verb|#|1"), "c", "A"); - -\tab{Texnewcmd(コマンド名,引数の個数,オプション値)}\\ -\tab{}\verb|\|newcommand を始める\TeX コマンドを出力 - -\tab{Texrenewcmd(コマンド名,引数の個数,オプション値)}\\ -\tab{}\verb|\|renewcommand を始める\TeX コマンドを出力 - -\tab{Texend()}\TeX のコマンド定義を終わる\TeX コマンドを出力 - -\tab{Texfor(カウンタ番号,初期値,終了値)}\\ -\tab{}\TeX のループ構造を始める.\\ -\chuu 初期値,終了値は文字列で与える.\\ -\rei Texfor(1,"1","\verb|#|1"); - -\tab{Texendfor(カウンタ番号)}\TeX のループ構造を終える.\\ -\rei Texendfor(1); - -\tab{Texforinit()}\TeX のループ構造を初期化 - -\tab{Texif(数値条件\ \{ ,1 \})}\TeX のif構造を始める.(ifnumまたは ifdim)\\ -\chuu 条件は文字列で与える.\\ -\chuu 1を追加したときは ifdim\\ -\rei Texif("Texctr(1)\verb|<#|2"); - -\tab{Texelse()}\TeX のelseブロック. - -\tab{Texendif()}\TeX のif構造を終える. -%\tab{Setmark()}マークシート用マークのコードを出力 - -%\tab{Putdashmark(表データ,\ 列番号,\ 行番号,文字列or番号)}\\ -%\rei Putdashmark(Out,2,1,0:9); - -%\tab{Putcirmark(表データ,\ 列番号,\ 行番号)} - -%\tab{Putrecmark(表データ,\ 列番号,\ 行番号} - -\subsection{カラー設定} - -\tab{Setcolor(色 \{, 濃さ\})}色を設定\\ -\chuu colorパッケージ必要\\ -\hspace*{2zw} 色は,次の文字列または [c,m,y,k]のベクトル\\ -\hspace*{2.5zw}"greenyellow"[0.15,0,0.69,0], -"yellow"[0,0,1,0], -"goldenrod"[0,0.1,0.84,0], -"dandelion"[0,0.29,0.84,0]\\ -\hspace*{2.5zw}"apricot"[0,0.32,0.52,0], -"peach"[0,0.5,0.7,0], -"melon"[0,0.46,0.5,0], -"yelloworange"[0,0.42,1,0]\\ -\hspace*{2.5zw}""orange"[0,0.61,0.87,0], -"burntorange"[0,0.51,1,0], -"bittersweet"[0,0.75,1,0.24],\\ -\hspace*{2.5zw}"redorange"[0,0.77,0.87,0]\\ -\hspace*{2.5zw}"mahogany"[0,0.85,0.87,0.35], -"maroon"[0,0.87,0.68,0.32], -"brickred"[0,0.89,0.94,0.28], -"red"[0,1,1,0]\\ -\hspace*{2.5zw}"orangered"[0,1,0.5,0], -"rubinered"[0,1,0.13,0], -"wildstrawberry"[0,0.96,0.39,0],\\ -\hspace*{2.5zw}"salmon"[0,0.53,0.38,0]\\ -\hspace*{2.5zw}"carnationpink"[0,0.63,0,0], -"magenta"[0,1,0,0], -"violetred"[0,0.81,0,0], -"rhodamine"[0,0.82,0,0]\\ -\hspace*{2.5zw}"mulberry"[0.34,0.9,0,0.02], -"redviolet"[0.07,0.9,0,0.34], -"fuchsia"[0.47,0.91,0,0.08],\\ -\hspace*{2.5zw}"lavender"[0,0.48,0,0]\\ -\hspace*{2.5zw}"thistle"[0.12,0.59,0,0], -"orchid"[0.32,0.64,0,0], -"darkorchid"[0.4,0.8,0.2,0], -"purple"[0.45,0.86,0,0]\\ -\hspace*{2.5zw}"plum"[0.5,1,0,0], -"violet"[0.79,0.88,0,0], -"royalpurple"[0.75,0.9,0,0], -"blueviolet"[0.86,0.91,0,0.04]\\ -\hspace*{2.5zw}"periwinkle"[0.57,0.55,0,0], -"cadetblue"[0.62,0.57,0.23,0], -"cornflowerblue"[0.65,0.13,0,0],\\ -\hspace*{2.5zw}"midnightblue"[0.98,0.13,0,0.43]\\ -\hspace*{2.5zw}"navyblue"[0.94,0.54,0,0], -"royalblue"[1,0.5,0,0], -"blue"[1,1,0,0], -"cerulean"[0.94,0.11,0,0]\\ -\hspace*{2.5zw}"cyan"[1,0,0,0], -"processblue"[0.96,0,0,0], -"skyblue"[0.62,0,0.12,0], -"turquoise"[0.85,0,0.2,0]\\ -\hspace*{2.5zw}"tealblue"[0.86,0,0.34,0.02], -"aquamarine"[0.82,0,0.3,0], -"bluegreen"[0.85,0,0.33,0],\\ -\hspace*{2.5zw}"emerald"[1,0,0.5,0]\\ -\hspace*{2.5zw}"junglegreen"[0.99,0,0.52,0], -"seagreen"[0.69,0,0.5,0], -"green"[1,0,1,0], -"forestgreen"[0.91,0,0.88,0.12]\\ -\hspace*{2.5zw}"pinegreen"[0.92,0,0.59,0.25], -"limegreen"[0.5,0,1,0], -"yellowgreen"[0.44,0,0.74,0],\\ -\hspace*{2.5zw}"springgreen"[0.26,0,0.76,0]\\ -\hspace*{2.5zw}"olivegreen"[0.64,0,0.95,0.4], -"rawsienna"[0,0.72,1,0.45], -"sepia"[0,0.83,1,0.7], -"brown"[0,0.81,1,0.6]\\ -\hspace*{2.5zw}"tan"[0.14,0.42,0.56,0], -"gray"[0,0,0,0.5], -"black"[0,0,0,1], -"white"[0,0,0,0] - -\end{document} - -\newpage - -\section{内部コマンド} - -\tab{CalcHeight} - -\tab{CalcWidth} - -\tab{Dataindex} - -\tab{Gaiseki} - -\tab{InWindow} - -\tab{Kouten} - -\tab{KoutenList} - -\tab{Koutenseg} - -\tab{Kyoukai} - -\tab{MakeBowdata} - -\tab{MakeCurves} - -\tab{Makehasen} - -\tab{Makeshasen} - -\tab{MeetWindow} - -\tab{Mixmake} - -\tab{Naigai} - -\tab{Naiseki} - -\tab{Vecnagasa(A, B)}$<$- norm(B-A) - -\tab{Makevaltable} - -\tab{Connectseg} - - - -\end{document} |