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 A146318 #5 Jul 22 2025 06:14:50 %S A146318 3,5,41,47,53,59,61,127,137,149,157,163,173,179,193,197,199,211,349, %T A146318 373,409,433,439,499,509,727,743,761,773,809,821,827,863,887,911,929, %U A146318 941,947,953,971,977,983,997,1361,1381,1447,1451,1459,1471,1487,1489,1499 %N A146318 Prime subtrahends of nearest cubes producing prime differences. %C A146318 Terms in A146317 + A146318 produce a cube %e A146318 a(3)=41 because when the prime 23 is subtracted from the cube 64, the result is another prime, 41 %o A146318 (UBASIC) 10 'cu less pr are prime 20 N=1:O=1 30 A=3:S=sqrt(N) 40 B=N\A 50 if B*A=N then 120 60 A=A+2 70 if A<=S then 40 80 R=O^3:Q=R-N 90 if N<R and N=prmdiv(N) and Q=prmdiv(Q) then print R;N;Q:C=C+1:N=N+2:goto 30 100 if C=30 then stop 120 N=N+2:if N<R then 30:else O=O+1:goto 80 %Y A146318 A146315 A146316 A146317 %K A146318 easy,nonn %O A146318 1,1 %A A146318 _Enoch Haga_, Oct 30 2008