A034449 -id:A034449

Search: a034449 -id:a034449

Displaying 1-1 of 1 result found.

page 1

A098191

The values within a cycle of length 53 of the map x->A098189(x), sorted.

+10
7

1500, 1570, 1714, 1718, 1722, 1768, 2062, 2066, 2070, 2084, 2120, 2220, 2276, 2328, 2348, 2578, 2582, 2586, 2760, 3218, 3222, 3328, 3428, 3552, 3704, 3736, 3792, 3864, 3984, 4192, 4324, 4332, 4400, 4480, 4656, 5088, 5128, 5464, 5544, 5856, 5872, 6200

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

COMMENTS

See various attractors in A098191-A098195.

LINKS

Michael De Vlieger, Table of n, a(n) for n = 1..53

EXAMPLE

The map has a trajectory 1500->2120->2084->1570->...->6660->9672->13248->11376->..->1768->1500 (returning

to the first term). The sequence contains all 53 members of this individual cycle, resorted to increasing magnitude.

MATHEMATICA

Union@ NestList[Function[n, DivisorSum[n, # &, CoprimeQ[#, n/#] &] - EulerPhi@ n], 1500, 53] (* Michael De Vlieger, Mar 01 2017 *)

CROSSREFS

Cf. A034449, A000010, A063919, A098189-A098195.

KEYWORD

nonn,fini

AUTHOR

Labos Elemer, Sep 03 2004

EXTENSIONS

Edited by R. J. Mathar, Mar 02 2009

STATUS

approved

page 1

Search completed in 0.008 seconds