A137464 Concatenation of n and a list of the divisors of n.

11, 212, 313, 4124, 515, 61236, 717, 81248, 9139, 1012510, 11111, 121234612, 13113, 1412714, 1513515, 16124816, 17117, 181236918, 19119, 2012451020, 2113721, 22121122, 23123, 241234681224, 251525, 26121326, 2713927, 2812471428, 29129

Offset

1,1

Links

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

Example

a(12), divisors of 12 are 1,2,3,4,6,12, so a(12) = 121234612.

Maple

cat2 := proc(a, b) a*10^max(ilog10(b)+1, 1)+b ; end: A137464 := proc(n) local a, d; a := n ; for d in sort(convert(numtheory[divisors](n), list)) do a := cat2(a, d) ; od: RETURN(a) ; end: seq(A137464(n), n=1..50) ; # R. J. Mathar, Apr 25 2008

Crossrefs

Sequence in context: A088061 A070220 A134069 * A357915 A187650 A357083

Adjacent sequences: A137461 A137462 A137463 * A137465 A137466 A137467

Keyword

easy,nonn,base,less

Author

Ctibor O. Zizka, Apr 19 2008

Extensions

Definition corrected by Omar E. Pol, Apr 21 2008

More terms from R. J. Mathar, Apr 25 2008

Status

approved