WOLFRAM

Wolfram言語 ＆ システムドキュメントセンター

AugmentedPolyhedron[poly]

各面を角錐で置換した側錐多面体 poly を与える．

AugmentedPolyhedron[poly,h]

高さ h の角錐を持つ側錐多面体を与える．

詳細とオプション
Details and Options Details and Options
例題  
例  
スコープ  
アプリケーション  
基本的なアプリケーション  
多面体操作  
特性と関係  
考えられる問題  
関連項目
関連するガイド
履歴
引用書式

AugmentedPolyhedron

AugmentedPolyhedron[poly]

各面を角錐で置換した側錐多面体 poly を与える．

AugmentedPolyhedron[poly,h]

高さ h の角錐を持つ側錐多面体を与える．

詳細とオプション

例題

すべて開く すべて閉じる

例  (2)

12面体の側錐多面体：

Wolfram Language code: AugmentedPolyhedron[Dodecahedron[]]
Wolfram Language code: Graphics3D[%]

スペースシャトルの側錐多面体を求める：

Wolfram Language code: 𝒫 = AugmentedPolyhedron[Polyhedron[{{-4.999492168426514, -0.6817100048065186, 0.569242000579834}, {-4.999759197235107, -0.4911530017852783, 0.8052060008049011}, {-5.349475860595703, -0.47093498706817627, 0.5660619735717773}, {-4.999759197235107, 0.491153001785278 ... }, {291, 218, 220}, {211, 259, 258}, {280, 206, 218}, {212, 258, 288}, {225, 187, 219}, {245, 197, 196}, {200, 236, 235}, {263, 196, 207}, {274, 205, 193}, {282, 210, 205}, {268, 193, 188}, {226, 219, 210}, {269, 188, 187}, {215, 288, 287}}]];

可視化する：

Wolfram Language code: Graphics3D[𝒫, Boxed -> False]

スコープ  (4)

AugmentedPolyhedronは多面体に使える：

Wolfram Language code: 𝒫 = Polyhedron[{{0, 0, 0}, {1, 0, 0}, {0, 1, 0}, {0, 0, 1}}, {{1, 2, 3}, {1, 2, 4}, {2, 3, 4}, {1, 3, 4}}];
Wolfram Language code: AugmentedPolyhedron[𝒫]
Wolfram Language code: Graphics3D[%]

プラトンの立体のAugmentedPolyhedronにはTetrahedronが含まれる：

Wolfram Language code: AugmentedPolyhedron[Tetrahedron[1]]

Cube：

Wolfram Language code: AugmentedPolyhedron[Cube[1]]

Dodecahedron：

Wolfram Language code: AugmentedPolyhedron[Dodecahedron[1]]
Wolfram Language code: Graphics3D[%]

Octahedron：

Wolfram Language code: AugmentedPolyhedron[Octahedron[1]]

Icosahedron：

Wolfram Language code: AugmentedPolyhedron[Icosahedron[1]]

多面体メッシュをサポートする：

Wolfram Language code: 𝒫 = ExampleData[{"Geometry3D", "SpaceShuttle"}, "BoundaryMeshRegion"]
Wolfram Language code: AugmentedPolyhedron[𝒫]
Wolfram Language code: Graphics3D[%]

多面体を異なる高さで側錐する：

Wolfram Language code: 𝒫 = Polyhedron[{{0, 0, 0}, {1, 0, 0}, {0, 1, 0}, {0, 0, 1}}, {{1, 2, 3}, {1, 2, 4}, {2, 3, 4}, {1, 3, 4}}];
Wolfram Language code: Table[Graphics3D[AugmentedPolyhedron[𝒫, h]], {h, {0.1, 0.2, 0.3, 0.4}}]

アプリケーション  (4)

基本的なアプリケーション  (3)

プラトンの立体とその側錐多面体：

Wolfram Language code: Grid[Table[{Graphics3D[f[1], Boxed -> False], [image], Graphics3D[AugmentedPolyhedron[f[1]], Boxed -> False]}, {f, {Tetrahedron, Cube, Octahedron, Dodecahedron, Icosahedron}}]]

アルキメデスの立体とその側錐多面体：

Wolfram Language code: Multicolumn[Table[Row[{Graphics3D[f, Boxed -> False, ImageSize -> 50], [image], Graphics3D[AugmentedPolyhedron[f], Boxed -> False, ImageSize -> 50]}], {f, PolyhedronData["Archimedean", "Polyhedron"]}], 2, Spacings -> 3]

プラトンの立体の側錐複合多面体：

Wolfram Language code: Table[Graphics3D[{Opacity[0.5], AugmentedPolyhedron[f[1]], f[1]}, Boxed -> False], {f, {Tetrahedron, Cube, Dodecahedron}}]

アルキメデスの立体：

Wolfram Language code: Table[Graphics3D[{Opacity[0.5], f, AugmentedPolyhedron[f]}, Boxed -> False], {f, PolyhedronData["Archimedean", "Polyhedron"]}]

多面体操作  (1)

AugmentedPolyhedronを使って，ジップ操作のような多面体操作を計算する：

Wolfram Language code: zip[poly_] := DualPolyhedron[AugmentedPolyhedron[poly]]
Wolfram Language code: zip[Tetrahedron[1]]
Wolfram Language code: Graphics3D[%]

特性と関係  (1)

側錐単純多面体は単純多面体である：

Wolfram Language code: 𝒫 = Polyhedron[{{0, 0, 0}, {1, 0, 0}, {0, 1, 0}, {0, 0, 1}}, {{1, 2, 3}, {1, 2, 4}, {2, 3, 4}, {1, 3, 4}}];
Wolfram Language code: SimplePolyhedronQ[#]& /@ {𝒫, AugmentedPolyhedron[𝒫]}

考えられる問題  (2)

AugmentedPolyhedronは単純多面体しかサポートしない：

Wolfram Language code: 𝒫 = Polyhedron[{{0, 0, 0}, {1, 0, 0}, {0, 1, 0}, {0, 0, 1}, {1, 0, 0}, {2, 0, 0}, {1, 1, 0}, {1, 0, 1}}, {{1, 2, 3}, {1, 2, 4}, {2, 3, 4}, {1, 3, 4}, {5, 6, 7}, {5, 6, 8}, {6, 7, 8}, {5, 7, 8}}];
Wolfram Language code: SimplePolyhedronQ[𝒫]
Wolfram Language code: AugmentedPolyhedron[𝒫]

AugmentedPolyhedronは退化した多面体を返すことがある：

Wolfram Language code: AugmentedPolyhedron[Polyhedron[{{-4.999492168426514, -0.6817100048065186, 0.569242000579834}, {-4.999759197235107, -0.4911530017852783, 0.8052060008049011}, {-5.349475860595703, -0.47093498706817627, 0.5660619735717773}, {-4.999759197235107, 0.491153001785278 ... }, {291, 218, 220}, {211, 259, 258}, {280, 206, 218}, {212, 258, 288}, {225, 187, 219}, {245, 197, 196}, {200, 236, 235}, {263, 196, 207}, {274, 205, 193}, {282, 210, 205}, {268, 193, 188}, {226, 219, 210}, {269, 188, 187}, {215, 288, 287}}]]
Wolfram Language code: RegionQ[%]
Wolfram Research (2019), AugmentedPolyhedron, Wolfram言語関数， https://reference.wolfram.com/language/ref/AugmentedPolyhedron.html.

テキスト

Wolfram Research (2019), AugmentedPolyhedron, Wolfram言語関数， https://reference.wolfram.com/language/ref/AugmentedPolyhedron.html.

CMS

Wolfram Language. 2019. "AugmentedPolyhedron." Wolfram Language & System Documentation Center. Wolfram Research. https://reference.wolfram.com/language/ref/AugmentedPolyhedron.html.

APA

Wolfram Language. (2019). AugmentedPolyhedron. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/AugmentedPolyhedron.html

BibTeX

@misc{reference.wolfram_2026_augmentedpolyhedron, author="Wolfram Research", title="{AugmentedPolyhedron}", year="2019", howpublished="\url{https://reference.wolfram.com/language/ref/AugmentedPolyhedron.html}", note=[Accessed: 12-August-2026]}

BibLaTeX

@online{reference.wolfram_2026_augmentedpolyhedron, organization={Wolfram Research}, title={AugmentedPolyhedron}, year={2019}, url={https://reference.wolfram.com/language/ref/AugmentedPolyhedron.html}, note=[Accessed: 12-August-2026]}