|
Search: id:A071250
|
|
|
| A071250 |
|
Palindromes with successive increasing difference: a(k)-a(k-1) > a(k+1)- a(k). |
|
+0
2
|
|
| 1, 2, 4, 7, 11, 22, 44, 77, 111, 151, 202, 262, 323, 393, 464, 545, 636, 737, 848, 969, 1111, 1331, 1661, 2002, 2442, 2992, 3553, 4224, 4994, 5775, 6666, 7667, 8778, 9999, 11311, 12721, 14141, 15651, 17171, 18781, 20402, 22122, 23932, 25752, 27672
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MATHEMATICA
|
p = 1; d = 0; Do[ If[ FromDigits[ Reverse[ IntegerDigits[n]]] == n && n - p > d, Print[n]; d = n - p; p = n], {n, 2, 29691}]
|
|
CROSSREFS
|
Cf. A078790.
Sequence in context: A024927 A018077 A114347 this_sequence A084992 A153555 A058103
Adjacent sequences: A071247 A071248 A071249 this_sequence A071251 A071252 A071253
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), May 21 2002
|
|
EXTENSIONS
|
Edited, corrected and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Dec 03 2002
|
|
|
Search completed in 0.002 seconds
|
