OFFSET
1,1
COMMENTS
One digit must be 2, 3, 5, or 7 and every other digit must be 1. If k is in the sequence, then so is every permutation of the digits of k. - Sean A. Irvine, Nov 08 2021
LINKS
Sean A. Irvine, Table of n, a(n) for n = 1..994
EXAMPLE
a(7)=115 because 1+1+5=7 which is prime and 1*1*5=5 which is prime
MATHEMATICA
okQ[n_]:=Module[{idn=IntegerDigits[n]}, PrimeQ[Total[idn]]&&PrimeQ[Times@@idn]]
Select[Range[1500000], okQ] (* Harvey P. Dale, Dec 15 2010 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Henry Bottomley, Mar 14 2000
STATUS
approved