My question is how to make colors of edges in CayleyGraph. This is an example.

group = PermutationGroup[pp]
     PermutationGroup[{Cycles[{{5, 8, 6}}], Cycles[{{4, 7, 8, 6, 5}}], 
      Cycles[{{2, 5, 8, 6, 3}}], Cycles[{{1, 4, 7, 8, 6, 5, 2}}], 
      Cycles[{{1, 4, 7, 8, 6, 3, 2}}], Cycles[{{2, 5, 4, 7, 8, 6, 3}}], 
      Cycles[{{1, 4, 5, 8, 6, 3, 2}}]}]

cayleygraph = CayleyGraph[group];

There are seven colors of edges in CayleyGraph. My trial to make colors is as follows.

colors = Hue[#] & /@ ((1/7)*{0, 1, 2, 3, 4, 5, 6} // N)
   {Hue[0.], Hue[0.14285714285714285`], Hue[0.2857142857142857], 
    Hue[0.42857142857142855`], Hue[0.5714285714285714], Hue[0.7142857142857143], Hue[0.8571428571428571]}

I want to know whether it is correct or not for edge colors of CayleyGraph.

Thanks, Yoshihiro Sato