如何在Mathematica 8中以编程方式访问有关“图形”对象的信息？

| 我正在尝试访问Mathematica 8中“ 0”对象中的信息。由于某些原因，“ 1”命令似乎不起作用。 myGraph是我要访问的对象。下面的第一行显示myGraph。其他人则负责检查。

myGraph

myGraph // FullForm  
myGraph // InputForm  
myGraph // OutputForm    
myGraph[[1]]
myGraph[[2]]

为什么myGraph[[1]]不返回List[1,3,4,2,5]？ [我检查了等级2，以防万一Graph被一些不可见的包装纸包裹起来。 Level[myGraph,1]，仅返回{}。 FullForm[myGraph][[1]]返回图形本身的图片。我一定忽略了一些显而易见的事情。编辑这是我用来生成图形的代码。大多数问题与眼前的问题无关。但是至少您将使用与我相同的代码。

ClearAll[edges, compatibleQ, adjacentCourses, g];
edges[w_, b_] := 
 Most /@ Accumulate /@ 
   Flatten[Permutations[#] & /@ IntegerPartitions[w, All, b], 1]

compatibleQ[j_, k_, edg_] := 
 If[Intersection[edg[[j]], edg[[k]]] == {}, {j, k}, False]

adjacentCourses[edg_] := 
 Module[{len = Length[edg]},
  Cases[Flatten[Table[compatibleQ[j, k, edg], {j, len}, {k, j, len}], 
    1], {v_, w_} :>  v \\[UndirectedEdge] w]]

myGraph =  Graph[adjacentCourses[edges[9, {2, 3}]], VertexLabels -> \"Name\", 
ImagePadding -> 10]

已邀请:

3 个回复

脖呐

尽管有外观，但在Mathematica 8中引入的图形对象不是“正常”符号表达式。以下SO问题详细讨论了此问题以及其他此类问题，包括提取图定义部分的方法： Mathematica 8.0中的新图

桔适丛

这可能对您有用，回答问题 \“如何在Mathematica 8中以编程方式访问有关\'Graph`对象的信息？\” 似乎有许多新功能可用于获取有关图的信息，如此处所列 http://reference.wolfram.com/mathematica/guide/GraphRepresentation.html。在您的示例中，您似乎想要按正确顺序排列图的顶点。 VertixList函数似乎可以做到这一点。这是doc中“属性和关系”部分的屏幕截图：

舞备联

事实证明，我的问题有一些简单的答案。 “ 0”的文档包含几种从“ 0”对象检索信息的方式。（我为不检查而感到羞耻。）在我看来，最有用的命令是：

VertexList[]
VertexCount[]
EdgeList[]
EdgeCount[]
EdgeRules[] 
VertexIndex[]
EdgeIndex[]
PropertyValue[]

我们通常需要在处理完图形对象后将其信息取出。我可以轻松找到我构建的图形中包含的信息，但是如果输出了派生图形，例如从NeighbourhoodGraph，如果不进行探测，我将不知道其属性。感谢@dbJohn提供到Wolfram文档的链接。特别感谢@WReach提供的先前指向Graph对象的SO讨论中他的评论的链接。

要回复问题请先登录或注册

如何在Mathematica 8中以编程方式访问有关“图形”对象的信息？

3 个回复

发起人

wolfram_mathematica

mathematica_8

问题状态

如何在Mathematica 8中以编程方式访问有关“图形”对象的信息？

与内容相关的链接

3 个回复

发起人

wolfram_mathematica

mathematica_8

问题状态