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 A226531 #11 May 28 2021 20:00:40 %S A226531 27,3375,4096,4913,35937,97336,110592,148877,421875,681472,1191016, %T A226531 1442897,1560896,2628072,3241792,3581577,3869893,4741632,5359375, %U A226531 8998912,10218313,12649337,16777216,16974593,21253933,26730899,31255875,32157432,43986977,45882712 %N A226531 Cubes that become prime when their least-significant (rightmost) digit is removed. %H A226531 Christian N. K. Anderson, <a href="/A226531/b226531.txt">Table of n, a(n) for n = 1..10000</a> %e A226531 4096 = 16^3, and becomes the prime number 409 when truncated. %t A226531 Select[Range[1000]^3,PrimeQ[Floor[#/10]]&] (* _Harvey P. Dale_, May 28 2021 *) %o A226531 (R) library(gmp)trimR=function(x) { x=as.character(x); ifelse(nchar(x)<2,0,substr(x,1,nchar(x)-1)) } %o A226531 y=as.bigz(rep(0,10000)); len=0; n=as.bigz(-1) %o A226531 while(len<10000) if(isprime(trimR((n=n+1)^3))) y[(len=len+1)]=n^3 %Y A226531 Cf. A226090. %Y A226531 Cf. A024770, A225873, A225885, A226354. %K A226531 nonn,base %O A226531 1,1 %A A226531 _Kevin L. Schwartz_ and _Christian N. K. Anderson_, Jun 09 2013