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 A295017 #12 Dec 15 2024 17:15:39 %S A295017 576,676,1764,2704,3721,4761,5476,5776,6724,7056,7225,7744,15376, %T A295017 17161,17424,20736,23716,27225,27556,30276,32761,35721,37636,47524, %U A295017 50176,51076,54756,57121,57600,67600,70225,70756,72361,73441,75076,75625,76176,101761,106276,126736,137641,141376 %N A295017 Squares whose largest digit is 7. %H A295017 Harvey P. Dale, <a href="/A295017/b295017.txt">Table of n, a(n) for n = 1..1000</a> %F A295017 a(n) = A295007(n)^2. %t A295017 Select[Range[1000]^2,Max[IntegerDigits[#]]==7&] (* _Harvey P. Dale_, Dec 15 2024 *) %o A295017 (PARI) is_A295017(n)=issquare(n)&&n&&vecmax(digits(n))==7 \\ The "n&&" avoids an error message for n=0. %Y A295017 Cf. A295007 (square roots of the terms), A277946 .. A277948 (same for digit 2 .. 4), A295015 .. A295019 (same for digit 5 .. 9), A295022 (same for cubes). %Y A295017 Cf. A000290 (the squares). %K A295017 nonn,base %O A295017 1,1 %A A295017 _M. F. Hasler_, Nov 12 2017