This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A051654 #22 Feb 24 2025 02:03:44 %S A051654 5,11,13,29,31,41,47,61,67,79,89,127,139,149,179,181,191,197,269,307, %T A051654 337,347,367,383,421,467,487,541,547,569,613,641,727,809,811,821,823, %U A051654 883,887,941,1031,1033,1087,1093,1103,1117,1193,1201,1237,1259,1279,1283 %N A051654 Primes p such that 30030*p + 1 is also prime. %H A051654 Michael De Vlieger, <a href="/A051654/b051654.txt">Table of n, a(n) for n = 1..10000</a> %F A051654 a(n) = (A051651(n)-1)/30030. - _Amiram Eldar_, Feb 24 2025 %e A051654 p = 5 and 30030*p + 1 = 150151 are both primes. %t A051654 Select[Prime@ Range@ 210, PrimeQ[30030 # + 1] &] (* _Michael De Vlieger_, Aug 15 2017 *) %o A051654 (PARI) isok(p) = isprime(p) && isprime(30030*p+1); \\ _Michel Marcus_, Dec 19 2013 %o A051654 (Magma) [p: p in PrimesUpTo (1300) | IsPrime(30030*p+1)]; // _Vincenzo Librandi_, Aug 16 2017 %Y A051654 Cf. A005384, A002110, A005385, A051651. %K A051654 nonn %O A051654 1,1 %A A051654 _Labos Elemer_ %E A051654 More terms from _Michel Marcus_, Dec 19 2013