|
|
A241895
|
|
Primes p equal to the sum in base 3 of the digits of all primes <= p.
|
|
0
|
|
|
3, 37, 695663, 695881, 1308731, 1308757, 1313153, 1314301, 1326097, 1766227, 3204779, 14328191
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
prime(n) such that, using base 3, prime(n) = sum_{1..n} A239619(i).
|
|
EXAMPLE
|
3 = digit-sum(primes <= 3,base=3) = sum(2) + sum(1,0). 37 = digit-sum(primes <= 37,base=3) = sum(2) + sum(1,0) + sum(1,2) + sum(2,1) + sum(1,0,2) + sum(1,1,1) + sum(1,2,2) + sum(2,0,1) + sum(2,1,2) + sum(1,0,0,2) + sum(1,0,1,1) + sum(1,1,0,1).
|
|
PROG
|
(PARI) sdt(n) = my(d = digits(n, 3)); sum(i=1, #d, d[i]);
lista(nn) = {sp = 0; forprime(p=1, nn, sp += sdt(p); if (p == sp, print1(p, ", ")); ); } \\ Michel Marcus, May 02 2014
|
|
CROSSREFS
|
Cf. A168161 (similar in base 2), A240886 (similar but excluding p from the sum).
|
|
KEYWORD
|
nonn,more,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|