A255608 Numbers n such that 36n+11, 36(n+1)+11, 36(n+2)+11 and 36(n+3)+11 are prime.
25, 40, 1390, 2965, 3730, 3835, 4120, 4225, 4890, 6165, 6200, 8020, 9035, 9720, 9825, 10765, 12235, 12710, 13740, 15545, 20320, 20880, 21215, 22805, 24625, 25015, 26220, 26325, 31695, 33970, 34305, 34655, 35845, 36215, 36735, 40430, 41740, 42055, 43210, 46590
Offset: 1
Keywords
Crossrefs
Subsequence of A215761.
Programs
-
Magma
[n: n in [0..50000] | forall{36*n+i: i in [11,47,83,119] | IsPrime(36*n+i)}]; // Vincenzo Librandi, Mar 03 2015
-
Maple
A255608:=n->`if`(isprime(36*n+11) and isprime(36*(n+1)+11) and isprime(36*(n+2)+11) and isprime(36*(n+3)+11), n, NULL): seq(A255608(n), n=1..10^5); # Wesley Ivan Hurt, Mar 03 2015
-
Mathematica
Select[Range@50000, AllTrue[36 Range[#, # + 3] + 11, PrimeQ] &] (* Michael De Vlieger, Mar 03 2015, Version 10 *)
-
PARI
select(n->isprime(36*n+11) && isprime(36*(n+1)+11) && isprime(36*(n+2)+11) && isprime(36*(n+3)+11), vector(50000, n, n)) \\ Colin Barker, Mar 01 2015
Comments