A066916 a(n) = n^phi(n) - 1.

0, 1, 8, 15, 624, 35, 117648, 4095, 531440, 9999, 25937424600, 20735, 23298085122480, 7529535, 2562890624, 4294967295, 48661191875666868480, 34012223, 104127350297911241532840, 25599999999, 7355827511386640, 26559922791423, 907846434775996175406740561328, 110075314175

Offset

1,3

Links

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

Formula

a(n) = A062981(n) - 1.

Mathematica

Table[n^EulerPhi[n]-1, {n, 30}] (* Harvey P. Dale, May 06 2015 *)

Prog

(PARI) a(n) = { n^eulerphi(n) - 1 } \\ Harry J. Smith, Apr 06 2010

Crossrefs

Cf. A000010, A062981, A066727, A066915.

Sequence in context: A153700 A343210 A190901 * A131446 A061746 A028585

Adjacent sequences: A066913 A066914 A066915 * A066917 A066918 A066919

Keyword

nonn

Author

Jason Earls, Jan 23 2002

Status

approved