在Wolfram Mathematica的图形上着色边缘

是否有可能使用颜色函数在Wolfram Mathematica中对图的边进行着色,这取决于边上的坐标? 就像使用Plot []中的ColorFunction选项一样。

我有一个函数在图的边上指定,取决于边的坐标。 是否有可能在边缘绘制这个函数的dencity? 感谢您的回应。

PS:第一个想法 - 使用Inset []在EdgeRenderingFunction中插入图形化的彩色对象,但它看起来很不自然。 有没有简单的方法?


使用ColorFunction在Graph中对边进行着色的一种方法是:

  ClearAll[colorededge];
  colorededge[pts_, colorfunc_: Function[{x, y}, ColorData["TemperatureMap"][y]]] := 
  ListPlot[pts, Joined -> True, PlotStyle -> Thick, Axes -> False, 
  ColorFunction -> colorfunc, ColorFunctionScaling -> True];
  edgshpfnc = (If[Last[#2] == "B", First@colorededge[#1], 
  First@colorededge[#1, Function[{x, y}, Blend[{Yellow, Red}, x]]]] &);
  Graph[{"A" -> "B", "B" -> "C", "C" -> "A"}, 
  VertexCoordinates -> {"A" -> {0, 0}, "B" -> {1, 1}, "C" -> {2, 0}}, 
  EdgeShapeFunction -> edgshpfnc, VertexLabels -> "Name",  ImagePadding -> 10]

 GraphPlot[{"A" -> "B", "B" -> "C", "C" -> "A"},
 EdgeRenderingFunction -> edgshpfnc, VertexLabeling -> True]

链接地址: http://www.djcxy.com/p/20257.html

上一篇: Coloring edges on graph in Wolfram Mathematica

下一篇: Mathematica combinatorica package: avoid graphs rendering