|
| |
|
|
A039679
|
|
Palindromic and prime Fibonacci-lucky numbers.
|
|
0
| |
|
|
2, 5, 7, 11, 101, 131, 151, 181, 353, 757, 787, 919, 929, 10501, 12721, 14341, 16661, 17471, 17971, 18181, 18481, 19991, 30803, 31513, 32323, 35053, 36263, 36563, 38083, 38783, 70207, 70507, 70607, 71317, 71917, 74747, 76667, 79997, 93739
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| See A039672 for definition.
|
|
|
MATHEMATICA
| t = Fold[Delete[ #1, Thread[{Rest[Range[0, Length@#1, #1[[ #2]] + #1[[ #2 + 1]]]]}]] &, Range@100000, Range@1000]; Select[t, PrimeQ@# && #==FromDigits@ Reverse@ IntegerDigits@# &] (from Robert G. Wilson v (rgwv(at)rgwv.com), May 12 2006)
|
|
|
CROSSREFS
| Sequence in context: A141064 A131102 A168031 * A088823 A007445 A159699
Adjacent sequences: A039676 A039677 A039678 * A039680 A039681 A039682
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Felice Russo (frusso(AT)micron.com)
|
|
|
EXTENSIONS
| Corrected by Naohiro Nomoto (n_nomoto(AT)yabumi.com), Oct 28 2001
More terms from Vit Planocka (planocka(AT)mistral.cz), Sep 13 2003
|
| |
|
|
