|
| |
|
|
A154275
|
|
Primes with prime = abs(sum of digits of prime(n)-sum of digits of n)
|
|
0
| |
|
|
5, 7, 11, 13, 19, 31, 37, 43, 47, 61, 67, 73, 89, 103, 107, 113, 137, 151, 157, 167, 173, 193, 211, 223, 227, 233, 239, 269, 271, 277, 281, 311, 353, 373, 379, 401, 409, 419, 421, 431, 433, 439, 443, 449, 467, 487, 503, 509, 571, 599, 601, 631, 641, 647, 653
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| Prime(36)=151 and abs(1+5+1-(3+6)) = abs(7-9) = 2, so a(16) = 151.
Prime(37)=157 and abs(1+5+7-(3+7)) = abs(13-10) = 3, so a(17) = 157.
|
|
|
MAPLE
| A007953 := proc(n) add(i, i=convert(n, base, 10)) ; end: A007605 := proc(n) A007953(ithprime(n)) ; end: A090431 := proc(n) A007953(n)-A007605(n) ; end: for n from 1 to 200 do q := abs(A090431(n)) ; if isprime(q) then p := ithprime(n) ; printf("%a, ", p) ; fi; od: [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jan 07 2009]
|
|
|
CROSSREFS
| Cf. A000040.
Sequence in context: A023219 A045438 A176579 * A167460 A045439 A093078
Adjacent sequences: A154272 A154273 A154274 * A154276 A154277 A154278
|
|
|
KEYWORD
| nonn,base,less
|
|
|
AUTHOR
| Juri-Stepan Gerasimov (2stepan(AT)rambler.ru), Jan 06 2009
|
|
|
EXTENSIONS
| 103, 113 etc. inserted by R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jan 07 2009
|
| |
|
|
