login
A364469
Numbers k whose digital sum is greater than the number of primes up to k (inclusive).
0
1, 2, 3, 4, 5, 6, 7, 8, 9, 16, 17, 18, 19, 28, 29
OFFSET
1,2
FORMULA
{ k : A007953(k) > A000720(k) }.
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
Sequence in context: A102489 A004838 A032998 * A032344 A032871 A023764
KEYWORD
nonn,base,full,fini
AUTHOR
Tanya Khovanova, Jul 29 2023
STATUS
approved