OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
152 is a term since 152/(1+5+2) = 19 and 153/(1+5+3) = 17 are both prime.
MATHEMATICA
moranQ[n_] := PrimeQ[n / Plus @@ IntegerDigits[n]]; Select[Range[50000], moranQ[#] && moranQ[#+1] &] (* Amiram Eldar, Apr 25 2020 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Jason Earls, Jul 23 2003
EXTENSIONS
Offset corrected by Amiram Eldar, Apr 25 2020
STATUS
approved