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 A101778 #6 Jan 29 2020 02:51:50 %S A101778 3,5,3,2,7,5,3,7,7,5,3,2,11,7,7,5,3,13,11,7,7,5,3,2,13,13,11,7,7,5,3, %T A101778 17,13,13,11,7,7,5,3,2,19,17,13,13,11,7,7,5,3,19,19,17,13,13,11,7,7,5, %U A101778 3,2,23,19,19,17,13,13,11,7,7,5,3,23,23,19,19,17,13,13,11,7,7,5,3,2,23 %N A101778 Last term in each row of triangle referenced in A101777. %H A101778 Jinyuan Wang, <a href="/A101778/b101778.txt">Table of n, a(n) for n = 1..10000</a> %F A101778 a(n) = A101777(A000217(n)). %o A101778 (PARI) A020482(k) = forprime(q=2, k, if(isprime(2*k-q), return(2*k-q))); %o A101778 a(n) = {my(r=(ceil(sqrt(2*n+1)))^2-2*n+3); if(r%2==0, r=A020482(r/2), if(isprime(r-2), r-=2, r=A020482(r\2))); r; } \\ _Jinyuan Wang_, Jan 29 2020 %Y A101778 Cf. A100555, A101776, A101777. %K A101778 nonn %O A101778 1,1 %A A101778 _Ray Chandler_, Jan 10 2005