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 A111249 #18 Sep 08 2022 08:45:21 %S A111249 3,5,9,15,17,27,29,33,39,47,53,59,63,65,69,77,87,89,93,95,99,105,107, %T A111249 117,125,129,135,137,143,149,155,165,183,185,195,203,209,213,225,227, %U A111249 237,243,245,267,275,285,287,297,303,305,315,323,327,329,333,339,345 %N A111249 Numbers n such that 7*n + 8 is prime. %C A111249 One less than the associated entry in A024905. %e A111249 If n=125 then 7*n + 8 = 883 (prime). %p A111249 A111249:=n->`if`(isprime(7*n+8), n, NULL): seq(A111249(n), n=1..10^3); # _Wesley Ivan Hurt_, Feb 13 2017 %t A111249 Select[Range[1,351,2], PrimeQ[7#+8]&] (* _Harvey P. Dale_, Sep 11 2016 *) %o A111249 (Magma) [n: n in [0..100000] | IsPrime(7*n+8)] // _Vincenzo Librandi_, Nov 13 2010 %o A111249 (PARI) is(n)=isprime(7*n+8) \\ _Charles R Greathouse IV_, Feb 14 2017 %Y A111249 Cf. A024900, A024902, A024905, A105772. %K A111249 nonn %O A111249 1,1 %A A111249 _Parthasarathy Nambi_, Oct 31 2005