A119520 The first 10 digits of the fifth root of n contain the digits 0-9.

911, 1974, 2326, 6236, 8346, 8403, 9301, 15317, 17412, 17601, 20512, 21914, 22211, 23513, 25510, 26192, 31591, 32432, 36947, 39194, 39783, 40414, 43141, 47511, 49116, 49606, 51014, 52604, 57547, 57753, 61087, 64023, 64747, 64913, 64949

Offset

1,1

Links

Table of n, a(n) for n=1..35.

Example

n=911. n^(1/5) = 3.907542186..., so 911 the first entry.

Mathematica

Select[Range[65000], Union[RealDigits[Surd[#, 5], 10, 10][[1]]]==Range[ 0, 9]&] (* Harvey P. Dale, May 27 2019 *)

Prog

(PARI) \\ The first 10 digits of i-th root of x contain all of the digits 0-9. rootdigits(n, i) = { local(f, x, y, a, d, s); for(x=2, n, f=[0, 0, 0, 0, 0, 0, 0, 0, 0, 0]; s=0; y=(x^(1/i))*10^9; a=Vec(Str(y)); for(d=1, 10, k=eval(a[d]); if(k==0, k=10); f[k]=1; ); for(j=1, 10, s+=f[j]); if(s==10, print1(x", ")); ) }

Crossrefs

Sequence in context: A352441 A210170 A068261 * A145646 A093634 A220984

Adjacent sequences: A119517 A119518 A119519 * A119521 A119522 A119523

Keyword

base,easy,nonn

Author

Cino Hilliard, May 27 2006

Status

approved