OFFSET
1,1
COMMENTS
SanD-d primes exist only for d = 14 + 18*k, k = -1/2, 0, 1, 2, 3, ...
This is the sequence for k = 6. See cross-references for other k and related sequences, in particular the main entry A307479.
PROG
(PARI) print_A307477(N, d=122)=forprime(p=2, , isprime(p+d)&&sumdigits(p*(p+d))==d&&!print1(p, ", ")&&!N--&&break)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
M. F. Hasler, Apr 09 2019
STATUS
approved