|
%I #8 Mar 20 2015 18:55:50
%S 6,64,64,625,6436343,64,62748517,6561,68719476736,60466176,
%T 64268410079232,68719476736,67108864,6103515625,6746640616477458432,
%U 65536,66249952919459433152512,68719476736,609359740010496
%N Smallest n-th power starting with 6.
%C Terms from _Robert G. Wilson v_.
%t a = {}; Do[k = 1; While[First[IntegerDigits[k^n]] != 6, k++ ]; a = Append[a, k^n], {n, 1, 25}]; a (* _Robert G. Wilson v_ *)
%Y Cf. A067442, A067443, A067444, A067445, A067446.
%K base,easy,nonn
%O 1,1
%A _Amarnath Murthy_, Feb 05 2002
|
