OFFSET
1,3
COMMENTS
This sequence was generated by adding 14 Fibonacci-like sequences [See: PROG]. Looking at the format 90n+61 modulo 9 and modulo 10 we see that all entries of A142330 have digital root 7 and last digit 1. (Reverting the process is an application of the Chinese remainder theorem.) The 14 Fibonacci-like sequences are generated (via the p and q values given in the Perl program) from the base p,q pairs 61*91, 19*79, 37*43, 73*7, 11*71, 29*89, 47*53, 83*17, 13*67, 31*31, 49*49, 23*77, 41*41, 59*59.
MATHEMATICA
Select[Range[0, 200], PrimeQ[90 # + 61] &]
PROG
(PARI) is(n)=isprime(90*n+61) \\ Charles R Greathouse IV, Feb 17 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
J. W. Helkenberg, Dec 11 2011
STATUS
approved