login
A176302
a(n) = floor(abs( (i+n)^n )) where "i" is the Imaginary unit.
1
1, 5, 31, 289, 3446, 50653, 883883, 17850625, 409413666, 10510100501, 298523873866, 9294114390625, 314715395761089, 11514990476898413, 452702917746710142, 19031147999601100801, 851888944448164153708
OFFSET
1,2
LINKS
MAPLE
seq(floor(abs((n+I)^n)), n = 1..30); # G. C. Greubel, Nov 26 2019
MATHEMATICA
Table[Floor@Abs[(I + n)^n], {n, 30}]
PROG
(PARI) default(realprecision, 50); vector(30, n, (abs((I+n)^n))\1 ) \\ G. C. Greubel, Nov 26 2019
(Magma) C<I> := ComplexField(); [Floor(Abs( (n+I)^n )): n in [1..30]]; // G. C. Greubel, Nov 26 2019
(Sage) [floor(abs( (n+i)^n )) for n in (1..30)] # G. C. Greubel, Nov 26 2019
CROSSREFS
Sequence in context: A292462 A340392 A360774 * A129586 A135744 A363744
KEYWORD
nonn
AUTHOR
STATUS
approved