login
A073730
Concatenation of largest and smallest digits of n in decimal representation.
2
11, 22, 33, 44, 55, 66, 77, 88, 99, 10, 11, 21, 31, 41, 51, 61, 71, 81, 91, 20, 21, 22, 32, 42, 52, 62, 72, 82, 92, 30, 31, 32, 33, 43, 53, 63, 73, 83, 93, 40, 41, 42, 43, 44, 54, 64, 74, 84, 94, 50, 51, 52, 53, 54, 55, 65, 75, 85, 95, 60, 61, 62, 63, 64, 65, 66, 76, 86, 96
OFFSET
1,1
COMMENTS
10 <= a(n) <= 99; a(a(n))=a(n).
LINKS
FORMULA
a(n) = A054055(n)*10 + A054054(n).
EXAMPLE
a(12321)=31; a(3210123)=30; a(59387)=83; a(8923)=92.
MATHEMATICA
Table[FromDigits[{Max[x = IntegerDigits[n]], Min[x]}], {n, 69}] (* Jayanta Basu, Jul 08 2013 *)
PROG
(Haskell)
a073730 n = 10 * a054055 n + a054054 n
-- Reinhard Zumkeller, Jul 21 2013
CROSSREFS
Cf. A073729.
Sequence in context: A364275 A351877 A073729 * A367610 A087346 A060314
KEYWORD
nonn,base,look
AUTHOR
Reinhard Zumkeller, Aug 05 2002
STATUS
approved