WOLFRAM

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

AnnotationDelete[obj]

オブジェクト obj のすべての注釈を削除する．

AnnotationDelete[{obj,itemspec}]

itemspec で指定された obj の項目のすべての注釈を削除する．

AnnotationDelete[spec,key]

spec で指定された注釈 key を削除する．

詳細
Details and Options Details and Options
例題  
例  
スコープ  
グラフとネットワーク  
グラフの注釈  
頂点の注釈  
辺の注釈  
領域  
アプリケーション  
特性と関係  
考えられる問題  
関連項目
関連するガイド
履歴
引用書式

AnnotationDelete

AnnotationDelete[obj]

オブジェクト obj のすべての注釈を削除する．

AnnotationDelete[{obj,itemspec}]

itemspec で指定された obj の項目のすべての注釈を削除する．

AnnotationDelete[spec,key]

spec で指定された注釈 key を削除する．

詳細

  • オブジェクトおよびオブジェクト内の特定の項目の注釈を削除するためによく使われる．
  • AnnotationDelete[spec,key]は，連想 key が削除された spec で指定されたオブジェクトを返す．
  • 標準的な注釈については，AnnotationDeleteは，事実上，注釈のデフォルト値に値をリセットする．
  • 次は，注釈を付けられる項目を含む可能性があるオブジェクトである．
  • Audio時点と時間間隔
    BoundaryMeshRegionメッシュセル
    CSGRegion幾何学領域
    Graph頂点と辺
    MeshRegionメッシュセル
  • 各オブジェクトタイプについての項目指定 itemspec は該当する関数ページを参照のこと．

例題

すべて開く すべて閉じる

例  (3)

頂点または辺の注釈を削除する：

Wolfram Language code: g = CompleteGraph[4, VertexLabels -> {1 -> "here"}, EdgeStyle -> {12 -> Red}]
Wolfram Language code: {AnnotationDelete[{g, 1}, VertexLabels], AnnotationDelete[{g, 12}, EdgeStyle]}

スタイルまたはラベルの注釈を削除する：

Wolfram Language code: mr = MengerMesh[1, MeshCellStyle -> {{1, All} -> Red}, MeshCellLabel -> {0 -> "Index"}]
Wolfram Language code: {AnnotationDelete[{mr, {1, All}}, MeshCellStyle], AnnotationDelete[{mr, 0}, MeshCellLabel]}

Audioオブジェクトに注釈を加える：

Wolfram Language code: a = Import["ExampleData/rule30.wav"];res = AudioAnnotate[a, {"tag1" -> {.5 -> "v11", {1, 1.5} -> "v12"}, "tag2" -> {.1 -> "v21", {.7, 1.5} -> "v22"}}];

特定のタグが付いた注釈を削除する：

Wolfram Language code: AnnotationDelete[res, "tag1"]//AudioAnnotationLookup

スコープ  (11)

グラフとネットワーク  (7)

グラフの注釈  (5)

頂点から1つの注釈を削除する：

Wolfram Language code: g = CompleteGraph[4, VertexStyle -> {1 -> Red}, VertexSize -> {1 -> Small}, EdgeStyle -> {12 -> Brown}, EdgeLabels -> {12 -> "hello"}]
Wolfram Language code: AnnotationDelete[{g, 1}, VertexStyle]

辺から注釈を削除する：

Wolfram Language code: AnnotationDelete[{g, 12}, EdgeLabels]

頂点からすべての注釈を削除する：

Wolfram Language code: AnnotationDelete[{g, 1}]

辺から注釈を削除する：

Wolfram Language code: AnnotationDelete[{g, 12}]

頂点からいくつかの注釈を削除する：

Wolfram Language code: CompleteGraph[4, VertexStyle -> {1 -> Red}, VertexSize -> {1 -> Small}, VertexLabels -> {1 -> "vertex"}];
Wolfram Language code: AnnotationDelete[{[image], 1}, {VertexLabels, VertexStyle}]

辺から：

Wolfram Language code: WheelGraph[4, DirectedEdges -> True, EdgeStyle -> {_ -> Arrowheads[0.08], 12 -> Directive[Brown, Arrowheads[0.08]]}, EdgeLabels -> {12 -> "edge"}];
Wolfram Language code: AnnotationDelete[{[image], 12}, {EdgeStyle, EdgeLabels}]

AnnotationDeleteは無向グラフに使うことができる：

Wolfram Language code: CycleGraph[3, EdgeStyle -> {12 -> Brown}, EdgeLabels -> {12 -> "edge"}];
Wolfram Language code: AnnotationDelete[{[image], 12}, EdgeStyle]

有向グラフに使う：

Wolfram Language code: CycleGraph[3, DirectedEdges -> True, EdgeStyle -> {12 -> Directive[Arrowheads[Small], Brown], Arrowheads[Small]}, EdgeLabels -> {12 -> "edge"}];
Wolfram Language code: AnnotationDelete[{[image], 12}, EdgeStyle]

重み付きグラフに使う：

Wolfram Language code: With[{g = CycleGraph[3], w = 0.3Range[3], pl = {Above, Right, Right} /. {Right -> {1 / 2, {-0.4, 1 / 2}}, Above -> {1 / 2, {1 / 2, 0}}}}, Graph[VertexList[g], EdgeList[g], EdgeWeight -> w, VertexShapeFunction -> "Name", EdgeLabels -> Thread[EdgeList[g] -> MapThread[Placed, {w, pl}]], VertexCoordinates -> GraphEmbedding[g]]];
Wolfram Language code: AnnotationDelete[{[image], 12}, EdgeLabels]

頂点の注釈  (1)

グラフにいくつかの注釈を設定する：

Wolfram Language code: g = CompleteGraph[4, VertexSize -> Small]
Wolfram Language code: AnnotationValue[{g, 4}, VertexStyle] = Red; AnnotationValue[{g, 1}, VertexLabels] = "hello"; AnnotationValue[{g, 1}, VertexShape] = [image]; AnnotationValue[{g, 1}, VertexSize] = Large; AnnotationValue[{g, 2}, VertexShapeFunction] = "Square";AnnotationValue[{g, 1}, VertexWeight] = 100;AnnotationValue[{g, 2}, "Material"] = "Wood";
Wolfram Language code: g

VertexStyleを含む頂点の注釈を削除する：

Wolfram Language code: AnnotationDelete[{g, 4}, VertexStyle]

VertexLabels：

Wolfram Language code: AnnotationDelete[{g, 1}, VertexLabels]

VertexSize：

Wolfram Language code: AnnotationDelete[{g, 1}, VertexSize]

VertexShape：

Wolfram Language code: AnnotationDelete[{g, 1}, VertexShape]

VertexShapeFunction：

Wolfram Language code: AnnotationDelete[{g, 2}, VertexShapeFunction]

VertexCoordinates：

Wolfram Language code: AnnotationDelete[{g, 1}, VertexCoordinates]

カスタムの注釈：

Wolfram Language code: MemberQ[PropertyList[{g, 2}], "Material"]
Wolfram Language code: AnnotationDelete[{g, 2}, "Material"];
Wolfram Language code: MemberQ[PropertyList[{%, 2}], "Material"]

辺の注釈  (1)

グラフにいくつかの注釈を設定する：

Wolfram Language code: g = CompleteGraph[4]
Wolfram Language code: AnnotationValue[{g, 12}, EdgeStyle] = Brown; AnnotationValue[{g, 12}, EdgeLabels] = "hello"; AnnotationValue[{g, 34}, EdgeShapeFunction] = "HalfFilledDoubleArrow"; AnnotationValue[{g, 12}, EdgeWeight] = 42; AnnotationValue[{g, 24}, "Resistance"] = 50.;
Wolfram Language code: g

EdgeStyleを含む辺の注釈を削除する：

Wolfram Language code: AnnotationDelete[{g, 12}, EdgeStyle]

EdgeLabels：

Wolfram Language code: AnnotationDelete[{g, 12}, EdgeLabels]

EdgeShapeFunction：

Wolfram Language code: AnnotationDelete[{g, 34}, EdgeShapeFunction]

カスタムの注釈：

Wolfram Language code: MemberQ[AnnotationKeys[{g, 24}], "Resistance"]
Wolfram Language code: AnnotationDelete[{g, 24}, "Resistance"];
Wolfram Language code: MemberQ[AnnotationKeys[{%, 24}], "Resistance"]

領域  (4)

子領域から1つの注釈を削除する：

Wolfram Language code: CSGRegion["Union", {Style[Ball[], Red], Style[Cuboid[], Blue]}]
Wolfram Language code: AnnotationDelete[{%, {1}}, "CSGRegionStyle"]

子領域からすべての注釈を削除する：

Wolfram Language code: CSGRegion["Union", {Style[Annotation[Ball[], "Material" -> "Metal"], Red], Cuboid[]}]
Wolfram Language code: AnnotationDelete[{%, {1}}]

すべての子領域から1つの注釈を削除する：

Wolfram Language code: CSGRegion["Union", {Style[Annotation[Ball[], "Material" -> "Wood"], Red], Style[Cuboid[], Blue]}]
Wolfram Language code: AnnotationDelete[%, "CSGRegionStyle"]
Wolfram Language code: AnnotationKeys[{%, {1}}]

CSGRegionオブジェクトからすべての注釈を削除する：

Wolfram Language code: CSGRegion["Union", {Style[Annotation[Ball[], "Material" -> "Wood"], Red], Style[Cuboid[], Blue]}]
Wolfram Language code: AnnotationDelete[%]
Wolfram Language code: AnnotationKeys[{%, {1}}]

アプリケーション  (2)

リンダは家族を表すグラフで匿名になりたいと思っている．彼女の頂点ラベルを隠す：

Wolfram Language code: ExampleData[{"NetworkGraph", "FamilyGathering"}]
Wolfram Language code: AnnotationDelete[{%, "Linda"}, VertexLabels]

Foldを使ってAnnotationDeleteを繰返し適用する：

Wolfram Language code: g = CycleGraph[8, VertexStyle -> Table[i -> RandomChoice[{Red, Green, Blue}], {i, 8}], VertexSize -> Large]
Wolfram Language code: Fold[AnnotationDelete[{#1, #2}, VertexStyle]&, g, Range[1, 7]]

すべての部分結果を示す：

Wolfram Language code: FoldList[AnnotationDelete[{#1, #2}, VertexStyle]&, g, Range[1, 7]]

特性と関係  (6)

Annotationをラッパーとして使ってGraph等の関数の注釈を指定する：

Wolfram Language code: Graph[{Annotation[1, {VertexSize -> Medium, VertexStyle -> Red}], 2, 3}, {12, 23, 31}]

AnnotationValueを使って値を抽出する：

Wolfram Language code: g = CompleteGraph[4, VertexStyle -> {1 -> Red}, VertexSize -> Small]
Wolfram Language code: AnnotationValue[{g, 1}, VertexStyle]

未定義の注釈に対しては値$Failedが返される：

Wolfram Language code: AnnotationValue[{g, 1}, "foo"]
Wolfram Language code: MemberQ[AnnotationKeys[{g, 1}], "foo"]

AnnotationValueを使ってグラフ内の注釈を設定する：

Wolfram Language code: g = CompleteGraph[4]
Wolfram Language code: AnnotationValue[{g, 1}, VertexSize] = Small;

もとのグラフが変わった：

Wolfram Language code: g

AnnotationValueを使ってグラフ内の注釈を解除する：

Wolfram Language code: g = CompleteGraph[4, VertexSize -> {1 -> Small}]
Wolfram Language code: AnnotationValue[{g, 1}, VertexSize]=.;

もとのグラフが変わった：

Wolfram Language code: g

AnnotationKeysを使って注釈があるかどうかを調べる：

Wolfram Language code: g = CompleteGraph[4, VertexLabels -> {1 -> one, 4 -> four}]
Wolfram Language code: MemberQ[AnnotationKeys[{g, 1}], VertexLabels]

頂点ラベルの規則のリストを生成する：

Wolfram Language code: Cases[VertexList[g], v_ /; MemberQ[AnnotationKeys[{g, v}], VertexLabels] :> v -> AnnotationValue[{g, v}, VertexLabels]]

Annotateを使ってもとのグラフを変えずに注釈を設定する：

Wolfram Language code: g = CompleteGraph[4]
Wolfram Language code: Annotate[{g, 1}, VertexSize -> Medium]

もとのグラフは変わっていない：

Wolfram Language code: g

考えられる問題  (1)

AnnotationValueは，一般に，AnnotationDeleteよりも速い：

Wolfram Language code: g = Graph[Annotation[#, VertexWeight -> 10.]& /@ Range[1000], {}];
Wolfram Language code: Timing@Do[AnnotationValue[{g, v}, VertexWeight]=., {v, VertexList[g]}]
Wolfram Language code: g = Graph[Annotation[#, VertexWeight -> 10.]& /@ Range[1000], {}];
Wolfram Language code: Timing@Do[g = AnnotationDelete[{g, v}, VertexWeight], {v, VertexList[g]}]
Wolfram Research (2019), AnnotationDelete, Wolfram言語関数， https://reference.wolfram.com/language/ref/AnnotationDelete.html （2025年に更新）.

テキスト

Wolfram Research (2019), AnnotationDelete, Wolfram言語関数， https://reference.wolfram.com/language/ref/AnnotationDelete.html （2025年に更新）.

CMS

Wolfram Language. 2019. "AnnotationDelete." Wolfram Language & System Documentation Center. Wolfram Research. Last Modified 2025. https://reference.wolfram.com/language/ref/AnnotationDelete.html.

APA

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

BibTeX

@misc{reference.wolfram_2026_annotationdelete, author="Wolfram Research", title="{AnnotationDelete}", year="2025", howpublished="\url{https://reference.wolfram.com/language/ref/AnnotationDelete.html}", note=[Accessed: 16-June-2026]}

BibLaTeX

@online{reference.wolfram_2026_annotationdelete, organization={Wolfram Research}, title={AnnotationDelete}, year={2025}, url={https://reference.wolfram.com/language/ref/AnnotationDelete.html}, note=[Accessed: 16-June-2026]}