|
Search: id:A077543
|
|
|
| A077543 |
|
Smallest n-digit composite palindrome. |
|
+0
1
|
|
| 4, 22, 111, 1001, 10001, 100001, 1000001, 10000001, 100000001, 1000000001, 10000000001, 100000000001, 1000000000001, 10000000000001, 100000000000001, 1000000000000001, 10000000000000001, 100000000000000001
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
a = {4, 22}; Do[k = 10^n; While[d = IntegerDigits[k]; p = FromDigits[ Join[d, Reverse[Drop[d, -1]]]]; PrimeQ[p], k++ ]; a = Append[a, p]; k = 10^n; While[d = IntegerDigits[k]; p = FromDigits[ Join[d, Reverse[d]]]; PrimeQ[p], k++ ]; a = Append[a, p], {n, 1, 8}]; a
|
|
CROSSREFS
|
Sequence in context: A108840 A007994 A006651 this_sequence A084157 A085939 A106835
Adjacent sequences: A077540 A077541 A077542 this_sequence A077544 A077545 A077546
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Nov 09 2002
|
|
EXTENSIONS
|
Edited and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 16 2002
|
|
|
Search completed in 0.002 seconds
|
