login
This site is supported by donations to The OEIS Foundation.

 

Logo

Annual appeal: Please make a donation to keep the OEIS running! Over 6000 articles have referenced us, often saying "we discovered this result with the help of the OEIS".
Other ways to donate

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A182604 Number of conjugacy classes in GL(n,9). 18
1, 8, 80, 720, 6552, 58960, 531360, 4782160, 43045920, 387413208, 3486777120, 31380993360, 282429470960, 2541865231440, 22876791858720, 205891126722080, 1853020183479912, 16677181651254480, 150094635248646000, 1350851717237225040, 12157665458621220720 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

LINKS

Alois P. Heinz, Table of n, a(n) for n = 0..350

FORMULA

G.f.: Product_{k>=1} (1-x^k)/(1-9*x^k). - Alois P. Heinz, Nov 03 2012

MAPLE

with(numtheory):

b:= proc(n) b(n):= add(phi(d)*9^(n/d), d=divisors(n))/n-1 end:

a:= proc(n) a(n):= `if`(n=0, 1,

       add(add(d*b(d), d=divisors(j)) *a(n-j), j=1..n)/n)

    end:

seq(a(n), n=0..30);  # Alois P. Heinz, Nov 03 2012

MATHEMATICA

b[n_] := Sum[EulerPhi[d]*9^(n/d), {d, Divisors[n]}]/n-1; a[n_] := a[n] = If[n == 0, 1, Sum[Sum[d*b[d], {d, Divisors[j]}]*a[n-j], {j, 1, n}]/n]; Table[a[n], {n, 0, 30}] (* Jean-Fran├žois Alcover, Feb 17 2014, after Alois P. Heinz *)

PROG

(MAGMA) /* The program does not work for n>6: */ [1] cat [NumberOfClasses(GL(n, 9)): n in [1..6]];

(PARI)

N=66; x='x+O('x^N);

gf=prod(n=1, N, (1-x^n)/(1-9*x^n)  );

v=Vec(gf)

/* Joerg Arndt, Jan 24 2013 */

CROSSREFS

Cf. A006951, A006952, A049314, A049315, A049316, A182603, A182605, A182606, A182607, A182608, A182609, A182610, A182611, A182612.

Sequence in context: A166157 A145729 A280121 * A290874 A024101 A291181

Adjacent sequences:  A182601 A182602 A182603 * A182605 A182606 A182607

KEYWORD

nonn

AUTHOR

Klaus Brockhaus, Nov 23 2010

EXTENSIONS

More terms from Alois P. Heinz, Nov 03 2012

MAGMA code edited by Vincenzo Librandi, Jan 24 2013

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified November 18 17:56 EST 2017. Contains 294894 sequences.