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 A052041 #26 Jul 23 2025 11:59:16 %S A052041 1,4,9,16,25,36,49,64,81,121,144,169,196,225,256,289,324,361,441,484, %T A052041 529,576,625,676,729,784,841,961,1156,1225,1296,1369,1444,1521,1681, %U A052041 1764,1849,1936,2116,2916,3136,3249,3364,3481,3721,3844,3969,4225,4356 %N A052041 Squares lacking the digit zero in their decimal expansion. %C A052041 This sequence is infinite: see A075415 or A102807 for a constructive proof. %C A052041 Intersection of A052382 and A000290; A168046(a(n))*A010052(a(n))=1. - _Reinhard Zumkeller_, Dec 01 2009 %H A052041 Alois P. Heinz, <a href="/A052041/b052041.txt">Table of n, a(n) for n = 1..1000</a> %H A052041 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/Zerofree.html">Zerofree</a> [From _Reinhard Zumkeller_, Dec 01 2009] %F A052041 a(n) = A052040(n)^2. - _R. J. Mathar_, Jul 23 2025 %t A052041 Select[Range[66]^2, FreeQ[IntegerDigits[#],0]==True &] (* _Jayanta Basu_, May 25 2013 *) %Y A052041 Cf. A104264, A102265, A102266. %Y A052041 Squares: A052040, A052042, A052043. Cubes: A051750, A051751, A051832, A051833. %K A052041 nonn,base %O A052041 1,2 %A A052041 _Patrick De Geest_, Dec 15 1999