[go: up one dir, main page]

login
A117280
a(n) = n^r(n), where r(n) is the digital root of n.
0
1, 1, 4, 27, 256, 3125, 46656, 823543, 16777216, 387420489, 10, 121, 1728, 28561, 537824, 11390625, 268435456, 6975757441, 198359290368, 19, 400, 9261, 234256, 6436343, 191102976, 6103515625, 208827064576, 7625597484987, 28, 841, 27000, 923521, 33554432
OFFSET
0,3
FORMULA
a(n) = n^r(n).
for n>0, a(n) = n^(((n-1) mod 9)+1).
EXAMPLE
a(13)=13^r(13)=13^4=28561.
MAPLE
[1, seq(n^(((n-1) mod 9)+1), n=1..30)]; # Georg Fischer, Sep 11 2024
MATHEMATICA
Join[{1}, Table[n^(Mod[n-1, 9]+1), {n, 32}]] (* James C. McMahon, Sep 13 2024 *)
CROSSREFS
Sequence in context: A070834 A045503 A134010 * A067040 A070271 A324809
KEYWORD
base,nonn,easy
AUTHOR
Luc Stevens (lms022(AT)yahoo.com), Apr 23 2006
EXTENSIONS
a(28) corrected by Georg Fischer, Sep 11 2024
STATUS
approved