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,2

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..1000

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 *)

Prog

(PARI) a(n)=round(sqrt(18)^n) \\ Charles R Greathouse IV, Nov 18 2011
(Magma) [Round(Sqrt(18)^n): n in [0..30]]; // Vincenzo Librandi, Nov 20 2011

Crossrefs

Cf. A010474, A001027 (bisection).

Sequence in context: A108012 A291417 A017958 * A100069 A058870 A219436

Adjacent sequences: A017956 A017957 A017958 * A017960 A017961 A017962

Keyword

nonn,easy

Author

N. J. A. Sloane

Status

approved