MathGroup Archive 2005

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: VertexStyle determined by List elements


Henning , Try this

SetGraphOptions[graph, Apply[Sequence, Table[{
  n, VertexStyle -> Disk[ToExpression["var" <> ToString[n]]]}, {n, 1,
10}]]]

SetGraphOptions[graph, {1, VertexStyle -> Disk[var1]}, {2, VertexStyle
-> \
Disk[var2]}, {3, VertexStyle -> Disk[var3]}, {4, VertexStyle -> Disk[
      var4]}, {5, VertexStyle -> Disk[var5]}, {6, VertexStyle -> Disk[
      var6]}, {7, VertexStyle -> Disk[var7]}, {8, VertexStyle -> Disk[
      var8]}, {9, VertexStyle -> Disk[var9]}, {10, VertexStyle -> Disk[
      var10]}]

Cheers,

Brian


  • Prev by Date: Importing binary file is toooooo slow...
  • Next by Date: Re: temporary file location
  • Previous by thread: Re: VertexStyle determined by List elements
  • Next by thread: Re: VertexStyle determined by List elements