login
A137464
Concatenation of n and a list of the divisors of n.
1
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
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
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