如何解决如何在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],len},{k,j,len}],1],{v_,w_} :> v \\[UndirectedEdge] w]]
myGraph = Graph[adjacentCourses[edges[9,{2,3}]],VertexLabels -> \"Name\",ImagePadding -> 10]
解决方法
尽管有外观,但在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讨论中他的评论的链接。
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。