A066791 a(n) = phi(n^2 + n + 1).

2, 6, 12, 12, 30, 42, 36, 72, 72, 72, 108, 156, 120, 210, 240, 144, 306, 294, 252, 420, 462, 312, 468, 600, 360, 648, 756, 540, 792, 756, 660, 900, 1122, 792, 1152, 1260, 792, 1482, 1332, 1092, 1722, 1656, 1260, 1692, 1944, 1224, 2160, 2160, 1512, 2550

Offset

1,1

Links

Harry J. Smith, Table of n, a(n) for n = 1..1000

Mathematica

Table[EulerPhi[n^2+n+1], {n, 60}] (* Harvey P. Dale, May 06 2013 *)

Prog

(PARI) { for (n=1, 1000, write("b066791.txt", n, " ", eulerphi(n^2 + n + 1)) ) } \\ Harry J. Smith, Mar 27 2010

Crossrefs

Cf. A000010 (phi).

Sequence in context: A058198 A096075 A278256 * A062723 A152667 A145892

Adjacent sequences: A066788 A066789 A066790 * A066792 A066793 A066794

Keyword

nonn

Author

Benoit Cloitre, Jan 18 2002

Status

approved