OFFSET
1,2
EXAMPLE
There are 10 primes that do not exceed 29, and the sum of digits of 29 is 11. Thus 29 is in this sequence.
There are 9 primes that do not exceed 27, and the sum of digits of 27 is also 9. Thus 27 is not in this sequence.
MATHEMATICA
Select[Range[2000], Total[IntegerDigits[#]] > PrimePi[#] &]
CROSSREFS
KEYWORD
nonn,base,full,fini
AUTHOR
Tanya Khovanova, Jul 29 2023
STATUS
approved