MathGroup Archive 2006

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

Search the Archive

Re: GraphPlot


<< DiscreteMath`GraphPlot`
n = 129;
d = Table[i -> Mod[i^2, n], {i, 0, n - 1}];
e = GraphPlot[d];

lis=Cases[e,{x_?NumberQ,y_?NumberQ},8];

Length[lis]
379

FullForm[e]

Regards
Dimitris


  • Prev by Date: Re: DownValues and Cases
  • Next by Date: binary units to units package
  • Previous by thread: Re: GraphPlot
  • Next by thread: Re: Re: GraphPlot