# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a176302 Showing 1-1 of 1 %I A176302 #8 Sep 08 2022 08:45:52 %S A176302 1,5,31,289,3446,50653,883883,17850625,409413666,10510100501, %T A176302 298523873866,9294114390625,314715395761089,11514990476898413, %U A176302 452702917746710142,19031147999601100801,851888944448164153708 %N A176302 a(n) = floor(abs( (i+n)^n )) where "i" is the Imaginary unit. %H A176302 G. C. Greubel, Table of n, a(n) for n = 1..375 %p A176302 seq(floor(abs((n+I)^n)), n = 1..30); # _G. C. Greubel_, Nov 26 2019 %t A176302 Table[Floor@Abs[(I + n)^n], {n,30}] %o A176302 (PARI) default(realprecision, 50); vector(30, n, (abs((I+n)^n))\1 ) \\ _G. C. Greubel_, Nov 26 2019 %o A176302 (Magma) C := ComplexField(); [Floor(Abs( (n+I)^n )): n in [1..30]]; // _G. C. Greubel_, Nov 26 2019 %o A176302 (Sage) [floor(abs( (n+i)^n )) for n in (1..30)] # _G. C. Greubel_, Nov 26 2019 %Y A176302 Cf. A115415, A115416. %K A176302 nonn %O A176302 1,2 %A A176302 _José María Grau Ribas_, Apr 14 2010 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE