login
A123992
Numbers k such that 16*k+1, 16*k+3 and 16*k+13 are primes.
1
1, 40, 106, 133, 250, 265, 271, 280, 295, 313, 418, 580, 691, 736, 748, 826, 946, 1231, 1240, 1435, 1471, 1561, 1756, 2023, 2035, 2038, 2101, 2575, 2728, 2878, 2926, 3268, 3400, 3451, 3688, 3715, 3883, 4213, 4306, 4726, 4936, 5080, 5398, 5761, 5908, 6046
OFFSET
1,2
LINKS
MAPLE
a:=proc(n) if isprime(16*n+1)=true and isprime(16*n+3)=true and isprime(16*n+13)=true then n else fi end: seq(a(n), n=1..5000); # Emeric Deutsch, Nov 03 2006
MATHEMATICA
Select[Range[6100], And @@ PrimeQ /@ ({1, 3, 13} + 16#) &] (* Ray Chandler, Nov 05 2006 *)
CROSSREFS
Cf. A092022.
Sequence in context: A044227 A044608 A241024 * A235301 A235291 A235893
KEYWORD
nonn
AUTHOR
Artur Jasinski, Oct 30 2006
EXTENSIONS
Extended by Ray Chandler, Nov 05 2006
STATUS
approved