|
%I #8 Oct 06 2019 18:38:01
%S 648,695,1979,7509,9214,12567,19740,21555,24235,24646,25624,27427,
%T 30717,30748,44205,53789,55838,61002,61621,63705,64087,65329,66100,
%U 66159,67099,67922,71252,74875,76443,83587,84488,88469,89609,93389
%N Decimal part of a(n)^(1/6) starts with a 'nine digits' anagram.
%H P. De Geest, <a href="http://www.worldofnumbers.com/ninedigits.htm">Nine Digits Digressions</a>
%e 84488^(1/6) = 6.{624185793}582700...
%t ndaQ[n_]:=Module[{rdn=RealDigits[n^(1/6),10,15],ts=Range[9],ds}, ds= Sort[Take[ Drop[rdn[[1]], rdn[[2]]],9]];ds==ts]; Select[Range[100000], ndaQ] (* _Harvey P. Dale_, Mar 30 2012 *)
%K nonn,base
%O 0,1
%A _Patrick De Geest_, Oct 15 1998
|
