|
| |
|
|
A056749
|
|
Smallest palindrome greater than n in bases 2 and n.
|
|
2
| |
|
|
3, 6643, 5, 31, 7, 85, 9, 127, 33, 255, 65, 313, 15, 693, 17, 341, 325, 381, 21, 1241, 771, 645, 325, 951, 27, 5461, 1317, 1161, 31, 1241, 33, 1453, 455, 5709, 3999, 2925, 195, 4097, 1025, 7671, 129, 2409, 45, 4097, 4095, 3855, 1421, 5049, 51, 8673, 3069
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 2,1
|
|
|
MATHEMATICA
| Do[ k = n +1; While[ RealDigits[ k, n ][ [ 1 ] ] != Reverse[ RealDigits[ k, n ][ [ 1 ] ] ] || RealDigits[ k, 2 ][ [ 1 ] ] != Reverse[ RealDigits[ k, 2 ][ [ 1 ] ] ], k++ ]; Print[ k ], {n, 2, 60} ]
|
|
|
CROSSREFS
| Sequence in context: A034317 A185671 A187879 * A134776 A062595 A128147
Adjacent sequences: A056746 A056747 A056748 * A056750 A056751 A056752
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 15 2000
|
| |
|
|
