cp's OEIS Frontend

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.

A256634 Numbers n such that the decimal expansions of both n and n^2 have 0 as smallest digit and 7 as largest digit.

This page as a plain text file.
%I A256634 #11 Apr 17 2015 15:32:52
%S A256634 740,760,1071,1740,2074,2705,2710,2740,2750,2760,3705,3710,3760,4071,
%T A256634 4705,4740,4760,5071,5705,5760,6740,7074,7240,7260,7400,7550,7560,
%U A256634 7600,7601,7760,10076,10174,10274,10275,10371,10375,10376,10571,10710,10724,10726,10740
%N A256634 Numbers n such that the decimal expansions of both n and n^2 have 0 as smallest digit and 7 as largest digit.
%H A256634 Felix Fröhlich, <a href="/A256634/b256634.txt">Table of n, a(n) for n = 1..10000</a>
%t A256634 fQ[n_] := Block[{c = DigitCount@ n}, And[Plus @@ Take[c, {8, 9}] == 0, c[[7]] > 0, c[[10]] > 0]]; Select[Range@ 10800, fQ@ # && fQ[#^2] &] (* _Michael De Vlieger_, Apr 12 2015 *)
%o A256634 (PARI) is(n) = vecmin(digits(n))==0 && vecmin(digits(n^2))==0 && vecmax(digits(n))==7 && vecmax(digits(n^2))==7
%Y A256634 Cf. A136813, A256630, A256631, A256633, A256708, A256709.
%K A256634 nonn,base
%O A256634 1,1
%A A256634 _Felix Fröhlich_, Apr 05 2015