|
Search: id:A016035
|
|
|
| A016035 |
|
Sum phi(j), j|n, 1<=j<n. Also (for n>1) n - phi(n) - 1. |
|
+0 1
|
|
| 0, 0, 0, 1, 0, 3, 0, 3, 2, 5, 0, 7, 0, 7, 6, 7, 0, 11, 0, 11, 8, 11, 0, 15, 4, 13, 8, 15, 0, 21, 0, 15, 12, 17, 10, 23, 0, 19, 14, 23, 0, 29, 0, 23, 20, 23, 0, 31, 6, 29, 18, 27, 0, 35, 14, 31, 20, 29, 0, 43, 0, 31, 26, 31, 16, 45, 0, 35, 24, 45, 0, 47, 0, 37, 34, 39, 16, 53
(list; graph; listen)
|
|
|
OFFSET
|
1,6
|
|
|
COMMENT
|
A number N is a Fermat base 2 pseudoprime, that is, 2^(N-1) == 1 mod N, iff 2^a(N) == 1 mod N. - T. D. Noe (noe(AT)sspectra.com), Jul 10 2003
Number of zero divisors in ring Z(n) - Armin Vollmer (armin_vollmer(AT)web.de), Jul 23 2004
|
|
REFERENCES
|
Al Hibbard and Ken Levasseur, "Exploring Abstract Algebra with Mathematica", Springer Verlag.
|
|
MATHEMATICA
|
Needs["AbstractAlgebra`Master`"] Length[ZeroDivisors[Z[ # ]]] & /@ Range[2, 25] (Vollmer)
|
|
CROSSREFS
|
Cf. A001567 (base 2 pseudoprimes).
Sequence in context: A070298 A024938 A004604 this_sequence A112470 A115379 A127801
Adjacent sequences: A016032 A016033 A016034 this_sequence A016036 A016037 A016038
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com)
|
|
|
Search completed in 0.002 seconds
|