TetGenGetFacetHoles[expr]
ファセットの穴を得る.
TetGenGetFacetHoles
TetGenGetFacetHoles[expr]
ファセットの穴を得る.
詳細とオプション
- TetGenGetFacetHolesを使うためには,まずNeeds["TetGenLink`"]を使ってそれをロードしなければならない.
- TetGenGetFacetHolesはTetGenインスタンスに設定されたファセットの穴を取り出す.
例題
例 (1)
TetGenLink を使うには,まずロードする必要がある:
Needs["TetGenLink`"]pts = {{0., 0., 0.}, {2., 0., 0.}, {2., 2., 0.}, {0., 2., 0.}, {0., 0., 2.}, {2., 0., 2.}, {2., 2., 2.}, {0., 2., 2.}, {0.25, 0., 1.}, {1.75, 0., 1.}, {1.75, 1.5, 1.}, {0.25, 1.5, 1.}, {0.25, 0., 1.5}, {1.75, 0., 1.5}, {1.75, 1.5, 1.5}, {0.25, 1.5, 1.5}};Graphics3D[{Red, PointSize[0.02], Point[pts]}]inInst = TetGenCreate[]TetGenSetPoints[inInst, pts]次にファセットのリストを作成する.この例題の第3のファセットのように,ファセットのリストに複数の項目がある場合,最初のファセットが境界となるファセットを表し,それ以降のファセットは境界のファセットの開口部の場所を示す.
facets = {{{1, 2, 3, 4}}, {{5, 6, 7, 8}}, {{1, 2, 6, 5}, {9, 10, 14, 13}}, {{2, 3, 7, 6}}, {{3, 4, 8, 7}}, {{4, 1, 5, 8}},
{{9, 10, 11, 12}}, {{9, 10, 14, 13}}, {{10, 11, 15, 14}}, {{11, 12, 16, 15}}, {{12, 9, 13, 16}}, {{13, 14, 15, 16}}
};Graphics3D[{ Opacity[0.25], GraphicsComplex[pts, Polygon /@ facets[[All, 1]]]}]Graphics3D[ GraphicsComplex[pts, Polygon[facets[[3]]]]]TetGenSetFacets[inInst, facets]TetGenがファセットを開くためには,ファセットの穴を設定する:
facetHoles = Table[{}, {Length[facets]}];
facetHoles[[3]] = {{1., 0., 1.25}};TetGenSetFacetHolesコマンドを使ってTetGenの入力インスタンスにファセットの穴を設定する:
TetGenSetFacetHoles[inInst, facetHoles]TetGenGetFacetHolesを使うと,TetGenインスタンスに設定された値を取り出すことができる:
TetGenGetFacetHoles[inInst]次は境界のファセットと,ファセットの穴の位置のグラフィックスである:
Graphics3D[ {{Red, PointSize[0.04], Point[facetHoles[[3]]]}, GraphicsComplex[pts, Polygon[facets[[3]]]]}]TetGenはオブジェクト全体をまずメッシュにし,次に穴や空洞からメッシュを取り除く.空洞も,その位置を指定するための点が必要である.開口部を指定する点では不十分である.TetGenが穴を配置する場所を指定するためには,TetGenSetHolesを使う:
holes = {{1., 0.4, 1.25}};TetGenSetHoles[inInst, holes];TetGenGetHolesを使うと,TetGenインスタンスに設定された値を取り出すことができる:
TetGenGetHoles[inInst]outInst = TetGenTetrahedralize[inInst, "pq"]面を抽出しそれを可視化するにはTetGenGetFacesを使う:
pts = TetGenGetPoints[outInst];
faces = TetGenGetFaces[outInst];Graphics3D[{Opacity[0.75], GraphicsComplex[pts, Polygon[ faces]]}, Boxed -> False]テクニカルノート
関連するガイド
テキスト
Wolfram Research (2010), TetGenGetFacetHoles, Wolfram言語関数, https://reference.wolfram.com/language/TetGenLink/ref/TetGenGetFacetHoles.html.
CMS
Wolfram Language. 2010. "TetGenGetFacetHoles." Wolfram Language & System Documentation Center. Wolfram Research. https://reference.wolfram.com/language/TetGenLink/ref/TetGenGetFacetHoles.html.
APA
Wolfram Language. (2010). TetGenGetFacetHoles. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/TetGenLink/ref/TetGenGetFacetHoles.html
BibTeX
@misc{reference.wolfram_2026_tetgengetfacetholes, author="Wolfram Research", title="{TetGenGetFacetHoles}", year="2010", howpublished="\url{https://reference.wolfram.com/language/TetGenLink/ref/TetGenGetFacetHoles.html}", note=[Accessed: 16-June-2026]}
BibLaTeX
@online{reference.wolfram_2026_tetgengetfacetholes, organization={Wolfram Research}, title={TetGenGetFacetHoles}, year={2010}, url={https://reference.wolfram.com/language/TetGenLink/ref/TetGenGetFacetHoles.html}, note=[Accessed: 16-June-2026]}