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 A074101 #13 Sep 19 2024 21:42:47
%S A074101 0,1,4,9,16,49,64,81,100,144,169,196,400,441,484,841,900,961,1089,
%T A074101 1444,1600,1681,1849,4096,4489,4900,6084,6400,6889,8100,8464,8649,
%U A074101 9409,9604,9801,10000,10404,10609,10816,11449,11664,11881,14161,14400,14641,14884
%N A074101 Squares using no prime digit.
%t A074101 t1 = Prime[Range[4]]; Select[Range[0, 124]^2, Intersection[IntegerDigits[#], t1] == {} &] (* _Jayanta Basu_, Jul 31 2013 *)
%Y A074101 Intersection of A000290 and A084984.
%K A074101 nonn,base
%O A074101 1,3
%A A074101 _Amarnath Murthy_, Aug 21 2002
%E A074101 More terms from _Jason Earls_, Jul 03 2003
%E A074101 Offset changed by _Andrew Howroyd_, Sep 19 2024