emath BBS

新規発言一覧最新記事過去一覧検索HOME

No.6062  Re[2]:スプライン曲線とX軸ではさむ面積を塗りつぶし
発言者: 田中徹
発言日: 2007 05/22 15:46
発言元: 124.44.4.207
> 残念ながら,その機能は用意してありません。
3点ずつとって Lagrangeの多項式と補間法で 2次関数を生成してみました。
# 12個の点で 11次関数は現実的でないようなので断念しました。

パラメータ長を可変にしてループ処理を考えましたが
スキルが足りなくこれも断念です。
# また粘着質と....

\documentclass[b5j]{jarticle}

\usepackage[papersize]{emathP}
\usepackage{emathC}

\makeatletter
\def\MakeFunction#1#2#3#4{%
\def\@ParamStr{#1}%
\argsep\@ParamStr{;}{@Cord}\@ArgNum%
\vecXY\@Cordi\@Ax\@Ay%
\vecXY\@Cordii\@Bx\@By%
\vecXY\@Cordiii\@Cx\@Cy%
\def\@FAx{((X-(\@Bx))*(X-(\@Cx)))/(((\@Ax)-(\@Bx))*((\@Ax)-(\@Cx)))*(\@Ay)}%
\def\@FBx{((X-(\@Cx))*(X-(\@Ax)))/(((\@Bx)-(\@Cx))*((\@Bx)-(\@Ax)))*(\@By)}%
\def\@FCx{((X-(\@Ax))*(X-(\@Bx)))/(((\@Cx)-(\@Ax))*((\@Cx)-(\@Bx)))*(\@Cy)}%
\edef#2{\@FAx+\@FBx+\@FCx}%
\edef#3{\@Ax}%
\edef#4{\@Cx}%
}
\makeatother
\begin{document}

\begin{zahyou}[ul=5mm](-1,6)(-1,5)
\def\A{(0.0,0.5)}%
\def\a{(0.0,0.8)}%
\def\AO{(0.0,0.0)}
\def\B{(0.5,0.8)}%
\def\b{(0.5,1.2)}%
\def\BO{(0.5,0.0)}
\def\C{(1.0,1.2)}%
\def\c{(1.0,1.5)}%
\def\CO{(1.0,0.0)}
\def\D{(1.5,1.5)}%
\def\d{(1.5,1.8)}%
\def\DO{(1.5,0.0)}
\def\E{(2.0,1.8)}%
\def\e{(2.0,2.4)}%
\def\EO{(2.0,0.0)}
\def\F{(2.5,2.4)}%
\def\f{(2.5,2.9)}%
\def\FO{(2.5,0.0)}
\def\G{(3.0,2.9)}%
\def\g{(3.0,3.3)}%
\def\GO{(3.0,0.0)}
\def\H{(3.5,3.3)}%
\def\h{(3.5,3.6)}%
\def\HO{(3.5,0.0)}
\def\I{(4.0,3.6)}%
\def\i{(4.0,4.0)}%
\def\IO{(4.0,0.0)}
\def\J{(4.5,4.0)}%
\def\j{(4.5,4.5)}%
\def\JO{(4.5,0.0)}
\def\K{(5.0,4.5)}%
\def\KO{(5.0,0.0)}
\def\L{(5.5,4.8)}
\thicklines
\Drawtpic[tpicBz=0]{\A\B\C\D\E\F\G\H\I\J\K\L}
\thinlines
\Drawline{\B\b\C\c\D\d\E\e\F\f\G\g\H\h\I\i\J\j\K}%
\Drawline{\B\BO}
\Drawline{\C\CO}
\Drawline{\D\DO}
\Drawline{\E\EO}
\Drawline{\F\FO}
\Drawline{\G\GO}
\Drawline{\H\HO}
\Drawline{\I\IO}
\Drawline{\J\JO}
\Drawline{\K\KO}
%%% ----------------------------------
\MakeFunction{\A;\B;\C}\Fx\Sx\Ex
\YNurii\Fx{0}{\Sx}{\Ex}
\MakeFunction{\C;\D;\E}\Fx\Sx\Ex
\YNurii\Fx{0}{\Sx}{\Ex}
\MakeFunction{\E;\F;\G}\Fx\Sx\Ex
\YNurii\Fx{0}{\Sx}{\Ex}
\MakeFunction{\G;\H;\I}\Fx\Sx\Ex
\YNurii\Fx{0}{\Sx}{\Ex}
\MakeFunction{\I;\J;\K}\Fx\Sx\Ex
\YNurii\Fx{0}{\Sx}{\Ex}
%%% ----------------------------------
\end{zahyou}
\end{document}


▼関連発言

6059:スプライン曲線とX軸ではさむ面積を塗りつぶし [pseudokanami] 05/22 11:47
 ├6060:Re:スプライン曲線とX軸ではさむ面積を塗りつぶし [tDB] 05/22 13:14
 │├6061:--- [---] 05/22 15:34
 │└6062:Re[2]:スプライン曲線とX軸ではさむ面積を塗りつぶし [田中徹] 05/22 15:46
 │ └6065:Re[3]:スプライン曲線とX軸ではさむ面積を塗りつぶし [pseudokanami] 05/22 22:55
 │  ├6066:Re[4]:スプライン曲線とX軸ではさむ面積を塗りつぶし [pseudokanami] 05/22 23:11
 │  ├6067:Re[4]:スプライン曲線とX軸ではさむ面積を塗りつぶし [田中徹] 05/23 00:10
 │  └6070:Re[4]:スプライン曲線とX軸ではさむ面積を塗りつぶし [飯島 徹@プー] 05/23 08:46
 │   └6073:Re[5]:スプライン曲線とX軸ではさむ面積を塗りつぶし [pseudokanami] 05/23 10:56
 ├6064:--- [---] 05/22 20:23
 ├6071:Re:スプライン曲線とX軸ではさむ面積を塗りつぶし [飯島 徹@プー] 05/23 08:58
 │└6072:Re[2]:スプライン曲線とX軸ではさむ面積を塗りつぶし [飯島 徹@プー] 05/23 09:14
 └6077:Re:スプライン曲線とX軸ではさむ面積を塗りつぶし [tDB] 05/23 19:54
  └6084:Re[2]:スプライン曲線とX軸ではさむ面積を塗りつぶし [pseudokanami] 05/25 14:10<-last

Pass 保存


CGIROOM