|
Search: id:A092589
|
|
| |
|
| 1, 3, 1, 15, 5, 63, 1, 177, 89, 913, -319, 4095, 2393, 10617, 1, 65535, 8897, 262143, -44287, 729537, 543553, 4015777, -1753087, 15622785, 11162969, 46358529, -1452031, 265390977, -2270911, 1073741823, 1, 2668569153, 2862962009, 15344762817, -8238350335, 68103158337, 45811586393
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MATHEMATICA
|
fs[x_] := EulerPhi[DivisorSigma[1, x]] sf[x_] := DivisorSigma[1, EulerPhi[x]] Table[fs[2^w]-sf[2^w], {w, 1, 65}]
|
|
CROSSREFS
|
Cf. A065395, A033632, A092584-A092588, A000203, A000010.
Sequence in context: A126454 A144815 A065250 this_sequence A048966 A104990 A089463
Adjacent sequences: A092586 A092587 A092588 this_sequence A092590 A092591 A092592
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), Mar 02 2004
|
|
|
Search completed in 0.002 seconds
|
