login
A075696
Sum-of-digits of k appears somewhere in prime(k).
3
7, 12, 13, 21, 25, 28, 30, 45, 47, 72, 81, 100, 104, 106, 107, 108, 114, 123, 133, 143, 150, 151, 152, 162, 171, 172, 180, 181, 191, 200, 207, 214, 230, 239, 249, 259, 269, 278, 279, 288, 298, 312, 314, 319, 322, 333, 340, 342, 344, 359, 397, 400, 403, 405
OFFSET
1,1
COMMENTS
Sums-of-digits of m are in A075697, primes are in A075698.
LINKS
EXAMPLE
12 is a term because sum-of-digits(12)=1+2=3 appears in prime(12)=37.
191 is a term because sum-of-digits(191)=1+9+1=11 appears in prime(191)=1153.
MATHEMATICA
Select[Range@500, StringContainsQ[ToString@Prime@#, ToString@Total@IntegerDigits@#]&] (* Giorgos Kalogeropoulos, Jul 03 2021 *)
PROG
(Python)
from sympy import prime, primerange
def auptopn(lim):
alst = []
for k, pk in enumerate(primerange(2, prime(lim)+1), start=1):
if str(sum(map(int, str(k)))) in str(pk): alst.append(k)
return alst
print(auptopn(405)) # Michael S. Branicky, Jul 03 2021
CROSSREFS
Sequence in context: A178660 A048653 A205807 * A061120 A078835 A173417
KEYWORD
easy,nonn,base
AUTHOR
Zak Seidov, Sep 26 2002
EXTENSIONS
Corrected and extended by Sascha Kurz, Jan 30 2003
STATUS
approved