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 A126992 #10 Jul 03 2019 13:15:30 %S A126992 5,7,7,13,17,19,23,23,31,37,41,47,47,53,53,61,67,73,79,83,83,89,89,97, %T A126992 109,113,113,113,127,127,139,139,151,151,163,163,173,173,181,181,193, %U A126992 199,199,199,211,211,223,233,241,241,241,251,257,263,269 %N A126992 a(n) is the largest prime smaller than sqrt(prime(n)*prime(n+6)). %H A126992 Robert Israel, <a href="/A126992/b126992.txt">Table of n, a(n) for n = 1..10000</a> %p A126992 f:= n -> prevprime(ceil(sqrt(ithprime(n)*ithprime(n+6)))): %p A126992 map(f, [$1..100]); # _Robert Israel_, Jun 21 2018 %t A126992 Table[Prime[PrimePi[Sqrt[Prime[n]*Prime[n + 6]]]], {n, 1, 55}] %t A126992 Table[NextPrime[Sqrt[Prime[n]Prime[n+6]],-1],{n,60}] (* _Harvey P. Dale_, Jul 03 2019 *) %K A126992 nonn %O A126992 1,1 %A A126992 _Artur Jasinski_, Jan 01 2007 %E A126992 Edited by _Stefan Steinerberger_, Jul 31 2007