The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A256708 Numbers n such that the decimal expansions of both n and n^2 have 0 as smallest digit and 8 as largest digit. 23
 280, 508, 780, 805, 1028, 1078, 1280, 1308, 1680, 1780, 1805, 1840, 2078, 2608, 2680, 2780, 2800, 2801, 2802, 2805, 2840, 2850, 3280, 3580, 3780, 3805, 3808, 3850, 4048, 4078, 4280, 4780, 4804, 4805, 4880, 5008, 5018, 5028, 5048, 5078, 5080, 5084, 5180, 5280 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Felix Fröhlich, Table of n, a(n) for n = 1..10000 MATHEMATICA fQ[n_] := Block[{c = DigitCount@ n}, And[c[[9]] == 0, c[[8]] > 0, c[[10]] > 0]]; Select[Range@ 5280, fQ@ # && fQ[#^2] &] (* Michael De Vlieger, Apr 12 2015 *) maxdQ[n_]:=Module[{id1=IntegerDigits[n], id2=IntegerDigits[n^2]}, Max[ id1] == Max[ id2] == 8&&Min[id1]==Min[id2]==0]; Select[Range[6000], maxdQ] (* Harvey P. Dale, Oct 19 2021 *) PROG (PARI) is(n) = vecmin(digits(n))==0 && vecmin(digits(n^2))==0 && vecmax(digits(n))==8 && vecmax(digits(n^2))==8 CROSSREFS Cf. A136814, A136820, A136825, A136829, A136832, A136840, A136845, A136849, A136904, A256630, A256631, A256633, A256634, A256709. Sequence in context: A241803 A361038 A245208 * A207075 A242039 A234911 Adjacent sequences: A256705 A256706 A256707 * A256709 A256710 A256711 KEYWORD nonn,base AUTHOR Felix Fröhlich, Apr 08 2015 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified August 3 23:57 EDT 2024. Contains 374905 sequences. (Running on oeis4.)