|
Search: id:A109924
|
|
|
| A109924 |
|
Least palindromic multiple of concatenation 123...n. |
|
+0
2
|
|
| 1, 252, 8118, 28382, 536797635, 6180330816, 85770307758, 2889123219882, 535841353148535, 135444949494445310, 1522312136776312132251
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
Leading zeros are allowed (but are not shown). Subsequence of A020485.
|
|
LINKS
|
P. De Geest, Smallest multipliers to make a number palindromic.
|
|
EXAMPLE
|
123*j is not palindromic for j < 66 and 123*66 = 8118, hence a(3) = 8118.
|
|
MATHEMATICA
|
f[n_] := Block[{k = 1, p = FromDigits[ Flatten[ IntegerDigits /@ Range[n]]]}, While[ If[ Mod[p, 10] == 0, p/=10]; While[k*p != FromDigits[ Reverse[ IntegerDigits[k*p]]], k++ ]; k*p]; Table[ f[n], {n, 11}] (* Robert G. Wilson v *)
|
|
PROGRAM
|
(PARI) {s=""; for(n=1, 10, s=concat(s, n); k=eval(s); if(n%10==0, m=0, j=1; while((m=k*j)!=intreverse(m), j++)); print1(m, ", "))} (for intreverse see A067723)
|
|
CROSSREFS
|
Cf. A020485, A050782, A061816, A109929.
Sequence in context: A027815 A099059 A024018 this_sequence A047831 A076013 A078263
Adjacent sequences: A109921 A109922 A109923 this_sequence A109925 A109926 A109927
|
|
KEYWORD
|
base,more,nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Jul 16 2005
|
|
EXTENSIONS
|
Edited and extended (a(5) to a(10)) by Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Jul 19 2005
a(10) - a(11) from Robert G. Wilson v (rgwv(at)rgwv.com), Jul 19 2005
|
|
|
Search completed in 0.002 seconds
|
