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 A127436 #7 Jun 08 2016 11:13:06 %S A127436 2,5,17,37,101,257,1297,1601,4357,15877,16901,22501,24337,32401,44101, %T A127436 57601,62501,65537,72901,78401,93637,156817,160001,176401,184901, %U A127436 217157,240101,309137,324901,331777,417317,476101,490001,562501,577601,682277 %N A127436 Primes associated with A127435. %C A127436 A sequence with P=a(k) distinct numbers contains a subsequence of p=A127435(k) monotonically increasing or decreasing terms, according to a corollary of the Erdos-Szekeres theorem. %F A127436 a(n) = (A127435(n)-1)^2 + 1. %t A127436 Select[(Prime@Range[300] - 1)^2 + 1, PrimeQ] (* _Ray Chandler_, Jan 23 2007 *) %o A127436 (PARI) listp(nn) = {forprime(p=2, nn, if (isprime(q=(p-1)^2 + 1), print1(q, ", ")););} \\ _Michel Marcus_, Jun 08 2016 %Y A127436 Cf. A127435. Subsequence of A045349. %K A127436 nonn %O A127436 1,1 %A A127436 _Lekraj Beedassy_, Jan 14 2007 %E A127436 Corrected and extended by _Ray Chandler_, Jan 23 2007