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 A094138 #9 Jul 09 2025 23:33:03 %S A094138 2,3,4,6,5,8,8,6,7,11,10,10,8,13,13,11,9,14,16,10,14,13,18,11,16,16, %T A094138 14,19,12,21,17,20,19,13,20,23,18,16,14,21,21,20,19,17,15,22,25,25,23, %U A094138 22,16,28,23,28,21,26,19,17,25,24,24,22,20,18,29,25,30,28,27,23,33,28,19 %N A094138 Values x+y of smallest pair (x,y) satisfying x^2 - 2*y^2=-+d, where d=A058529(n). %C A094138 Here (x,y) is considered smaller than (u,v) iff x+y < u+v or (x+y = u+v and x < u). %e A094138 A058529(14) = 103; (5, 8), (11, 3), (17, 14), (21, 13), ... are pairs satisfying x^2 - 2*y^2 = -+103; (5, 8) is the smallest one, so a(14) = 5+8 = 13. %o A094138 (PARI) {for(n=1,690,fac=factor(n);v=vector(matsize(fac)[1],j,fac[j,1])%8;b=1;for(k=1,length(v),if(v[k]>1&&v[k]<7,b=0));if(b>0,print1(sp(n)[3],",")))} \\ For sp(n) see A094136. %Y A094138 Cf. A058529, A094136, A094137. %K A094138 nonn %O A094138 1,1 %A A094138 _Lekraj Beedassy_, May 04 2004 %E A094138 Edited, corrected and extended by _Klaus Brockhaus_ May 31 2004