带图像的images

Question

我正在尝试使用GraphPlot函数来构建一个Graph，其中每个节点都是一个图像。我想将图像显示为我的顶点。有人知道怎么做吗？

我尝试了这样的东西：

GraphPlot[  Map[If[# > 2.0 , 0, 1] &,
 imgDistT, {2}],  
 VertexRenderingFunction -> (Inset[imgs[[#2]], #1, Center] &) ]

但这是行不通的。imgs是与每个顶点编号对应的图像列表。

作为一个健全的检查，如果我这样做：

GraphPlot[
 Map[If[# > 2.0 , 0, 1] &, imgDistT, {2}], 
 VertexRenderingFunction -> (Inset[Text[#2], #1, Center] &) ]

然后，它显示了每个节点的顶点编号。

Answer 1

 imgs = ExampleData /@ ExampleData["TestImage"];
 GraphPlot[{1 -> 4, 1 -> 5, 2 -> 3, 2 -> 4, 2 -> 5, 3 -> 4, 3 -> 5}, 
   VertexRenderingFunction -> (Inset[Image[imgs[[#2]], ImageSize -> 100], #1] &)]

​

​

编辑

--中缀符号笑话被删除--

Answer 2

两个可能的问题：

• 它看起来您的图形Map[If[# > 2.0 , 0, 1] &, imgDistT, {2}]将包含0和1-但是对于imgs数组
• ，0是无效的索引。由于缩放问题，图像可能不能正确显示-例如，它们可能真的很大，只有白色部分可能是可见的。请尝试指定显式图像大小。

以下命令的输出是什么

GraphPlot[Map[If[# > 2.0 , 0, 1] &, imgDistT, {2}],
 VertexRenderingFunction -> (Module[{tmp = 
       Inset[Image[imgs[[#2]], ImageSize -> 10], #1, Center]}, 
     Print[tmp]; tmp] &)]