OFFSET
1,1
LINKS
Michael S. Branicky, Table of n, a(n) for n = 1..10000
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
KEYWORD
easy,nonn,base
AUTHOR
Zak Seidov, Sep 26 2002
EXTENSIONS
Corrected and extended by Sascha Kurz, Jan 30 2003
STATUS
approved