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 A108601 #14 Jun 12 2017 19:19:54 %S A108601 132,136,142,144,150,154,156,162,166,172,174,180,190,192,196,202,214, %T A108601 216,222,234,240,244,246,250,252,256,264,276,280,282,286,304,306,310, %U A108601 316,330,334,342,346,352,354,360,364,372,376,384,394,396,400,406,412 %N A108601 Numbers n such that 7*n - 911 is prime. %C A108601 7 and 911 are primes. %C A108601 Since 7*n-911=7*(n-131)+6, the corresponding primes are in A045473. - _R. J. Mathar_, Apr 26 2008 %H A108601 Harvey P. Dale, <a href="/A108601/b108601.txt">Table of n, a(n) for n = 1..1000</a> %e A108601 If n=132 then 7*n - 911 = 13 (prime). %e A108601 If n=172 then 7*n - 911 = 293 (prime). %p A108601 A108601 := proc(n) option remember ; if n = 1 then 132 ; else for a from A108601(n-1)+1 do if isprime(7*a-911) then RETURN(a) ; fi ; od: fi ; end: seq(A108601(n),n=1..80) ; # _R. J. Mathar_, Apr 26 2008 %t A108601 Select[Range[131,500],PrimeQ[7#-911]&] (* _Harvey P. Dale_, Dec 08 2014 *) %o A108601 (PARI) is(n)=isprime(7*n-911) \\ _Charles R Greathouse IV_, Jun 12 2017 %K A108601 nonn,easy %O A108601 1,1 %A A108601 _Parthasarathy Nambi_, Jul 25 2005 %E A108601 More terms from _R. J. Mathar_, Apr 26 2008