login
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
OFFSET
1,1
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).
Sequence in context: A284411 A176245 A122787 * A093939 A129122 A345688
KEYWORD
nonn,more,base
AUTHOR
Anthony Sand, May 01 2014
STATUS
approved