A154875 Numbers k such that k^4 contains every digit exactly 3 times.

17824719, 17940018, 18027474, 18197931, 18326025, 18798396, 18915888, 18929424, 19027455, 19149462, 19180275, 19196064, 19235673, 19311297, 19322913, 19324275, 19328322, 19455918, 19522575, 19757886, 19793664

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..172

Example

22807116 ^ 4 = 270571148920443982076865351936, which contains exactly 3 times of each digit 0-9.

Mathematica

Select[Range[17824000, 31608000], Union[Tally[IntegerDigits[#^4]][[All, 2]]]=={3}&] (* Harvey P. Dale, Dec 24 2016 *)

Prog

(PARI) is(n) = my(v=vector(10), d=digits(n^4)); if(#d!=30, return(0)); for(i=1, #d, v[d[i]+1]++; if(v[d[i]+1] > 3, return(0))); 1 \\ David A. Corneth, Aug 19 2025

Crossrefs

Cf. A054038, A074205, A154532, A154566, A154871, A154873, A154874.

Sequence in context: A344631 A372694 A159192 * A015353 A083619 A257550

Adjacent sequences: A154872 A154873 A154874 * A154876 A154877 A154878

Keyword

nonn,easy,base,fini,full

Author

Zhining Yang, Jan 16 2009

Status

approved