A017959 Powers of sqrt(18) rounded to nearest integer.
1, 4, 18, 76, 324, 1375, 5832, 24743, 104976, 445375, 1889568, 8016758, 34012224, 144301645, 612220032, 2597429617, 11019960576, 46753733110, 198359290368, 841567195983, 3570467226624, 15148209527701
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Programs
-
Magma
[Round(Sqrt(18)^n): n in [0..30]]; // Vincenzo Librandi, Nov 20 2011
-
Maple
Digits:=1500: A017959:=n->round(sqrt(18)^n): seq(A017959(n), n=0..30); # Wesley Ivan Hurt, Apr 18 2017
-
Mathematica
Floor[(Sqrt[18])^Range[0,25]+1/2] (* Vincenzo Librandi, Nov 20 2011 *)
-
PARI
a(n)=round(sqrt(18)^n) \\ Charles R Greathouse IV, Nov 18 2011