login
A067448
Smallest n-th power whose decimal expansion starts with 7.
3
7, 729, 729, 707281, 7776, 729, 78125, 78310985281, 794280046581, 79792266297612001, 743008370688, 7355827511386641, 793714773254144, 78364164096, 734461618571137961752599, 79766443076872509863361
OFFSET
1,1
COMMENTS
Terms from Robert G. Wilson v.
MATHEMATICA
a = {}; Do[k = 1; While[First[IntegerDigits[k^n]] != 7, k++ ]; a = Append[a, k^n], {n, 1, 25}]; a (* Robert G. Wilson v *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Amarnath Murthy, Feb 05 2002
STATUS
approved