|
Search: id:A070249
|
|
|
| A070249 |
|
Palindromic primes with digit sum 8. |
|
+0
5
|
|
| 10601, 11411, 30203, 31013, 1022201, 1120211, 1300031, 3002003, 100060001, 103000301, 111020111, 300020003, 300101003, 10002220001, 10200200201, 10210001201, 1000030300001, 1021000001201, 1030000000301, 1101010101011
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
Do[p = Join[ IntegerDigits[n], Reverse[ Drop[ IntegerDigits[n], -1]]]; q = Plus @@ p; If[ PrimeQ[ FromDigits[p]] && q == 8, Print[ FromDigits[p]]], {n, 1, 10^7}]
|
|
CROSSREFS
|
Cf. A002385, A070247 and A070248.
Sequence in context: A063433 A089494 A066054 this_sequence A083977 A082442 A031864
Adjacent sequences: A070246 A070247 A070248 this_sequence A070250 A070251 A070252
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), May 05 2002
|
|
EXTENSIONS
|
Edited by Robert G. Wilson v (rgwv(AT)rgwv.com), May 15 2002
|
|
|
Search completed in 0.002 seconds
|
