|
|
A098193
|
|
Terms in a specific cycle of length 7 of the map x->A098189(x).
|
|
4
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
The map enters a cycle of length 7 if started at x=294, indicated by A098190(294)=7.
The group members of this cycle are listed here in ascending order.
|
|
LINKS
|
|
|
EXAMPLE
|
An iteration started at 294 leads to a attractor which cycles through 7 numbers:
294->516->712->458->462->1032->1248->1464->1752->[2088->2028->2776->1748->1608->1920->2584->2088,..].
After 9 transients, the cycle (indicated by bracketing its members) is entered.
|
|
PROG
|
(PARI) A098189(n)=my(f=factor(n)); prod(k=1, #f~, f[k, 1]^f[k, 2]+1) - eulerphi(f)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,fini,full
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|