OFFSET
1,3
COMMENTS
Encoded primes with LSD 3, (SOD-1)/3 integer, (LSD, least significant digit; SOD, sum of digits). Divide any such number by 30, if the whole number portion of the quotient is in the sequence, the number is prime.
EXAMPLE
Example: 3163, with LSD 3 and (SOD-1)/3 = 4 (integer); Then 3163/30 = 105.433, or 105 which is in the sequence, thus 3163 is prime.
MATHEMATICA
Select[Range[0, 200], PrimeQ[30#+13]&] (* Harvey P. Dale, Oct 16 2018 *)
PROG
(PARI) is(n)=isprime(30*n+13) \\ Charles R Greathouse IV, Feb 17 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Ki Punches, Mar 25 2009
EXTENSIONS
Edited by Ray Chandler, Apr 07 2009
STATUS
approved