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 A107261 #6 Nov 12 2024 22:17:50 %S A107261 0,0,2,0,1,1,3,2,2,1,3,3,3,3,3,6,0,6,3,3,4,3,3,10,1,0,1,10,3,5,5,5,3, %T A107261 12,1,3,2,3,1,14,4,7,5,7,4,14,3,4,2,2,2,4,5,15,7,7,5,7,7,15,5,7,2,7,0, %U A107261 8,2,7,5,15,9,7,6,7,9,15,5,9,3,11,1,3,1,11,3,9,5,18,9,9,6,9,9,18,5 %N A107261 Number of a(i), 0<=i<n, that are equal to A053615(n). %H A107261 Andrew Howroyd, <a href="/A107261/b107261.txt">Table of n, a(n) for n = 0..10000</a> %o A107261 (PARI) \\ here b(n)=A053615(n) %o A107261 b(n)={my(t=(sqrtint(4*n) + 1)\2); t-abs(t^2-n)} %o A107261 seq(n)={my(f=vector(sqrtint(n)+1), a=vector(n+1)); for(i=0, n, my(k=f[1+b(i)]); a[1+i]=k; if(k<#f, f[1+k]++)); a} \\ _Andrew Howroyd_, Nov 12 2024 %Y A107261 Cf. A032531, A107262. %K A107261 nonn %O A107261 0,3 %A A107261 _Ralf Stephan_, May 15 2005