|
| |
|
|
A107794
|
|
Numbers n such that both n plus its first digit and n minus its first digit are primes.
|
|
0
| |
|
|
12, 18, 21, 34, 65, 67, 81, 92, 98, 102, 108, 138, 150, 180, 192, 198, 225, 231, 279, 310, 314, 334, 350, 356, 370, 376, 386, 405, 435, 453, 483, 495, 504, 552, 582, 607, 613, 625, 637, 647, 653, 667, 726, 750, 780, 819, 831, 920, 928, 938, 962, 1020, 1032, 1050
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Average of pairs: 66,3255,3465,6696,6786,6954,9429,31725,34845,60096,...
|
|
|
MATHEMATICA
| Select[ Range[1060], PrimeQ[ # + IntegerDigits[ # ][[1]]] && PrimeQ[ # - IntegerDigits[ # ][[1]]] &]
|
|
|
CROSSREFS
| Intersection of A107835 & A107836.
Sequence in context: A071927 A171674 A031207 * A162151 A056773 A175837
Adjacent sequences: A107791 A107792 A107793 * A107795 A107796 A107797
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| Eric Angelini (eric.angelini(AT)kntv.be) and Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 14 2005
|
| |
|
|
