A113707 Numbers k such that the base-10 representation of sigma(k) is a cyclic permutation of the base-10 representation of k.

1, 69, 609, 196833, 241605, 440503, 2374119, 2841633, 3256479, 5529975

Offset

1,2

Links

Table of n, a(n) for n=1..10.

Example

sigma(196833) = 331968.

Mathematica

lst = {}; Do[s = ToString@n; d = ToString@DivisorSigma[1, n]; If[StringLength@d == StringLength@d && {}!= StringPosition[s<>s, d], AppendTo[lst, n]], {n, 10^6}]; lst

Crossrefs

Cf. A000203.

Sequence in context: A211692 A264288 A360359 * A259398 A093269 A108147

Adjacent sequences: A113704 A113705 A113706 * A113708 A113709 A113710

Keyword

base,nonn,more

Author

Giovanni Resta, Jan 26 2006

Status

approved