|
%I #13 Apr 27 2017 19:46:55
%S 1,2,4,7,13,25,47,89,169,321,609,1157,2197,4172,7921,15041,28561,
%T 54232,102978,195538,371293,705022,1338716,2541993,4826809,9165285,
%U 17403307,33045903,62748517,119148699,226242996,429596743,815730721,1548933086,2941158942,5584757663
%N Powers of fourth root of 13 rounded to nearest integer.
%H Vincenzo Librandi, <a href="/A018082/b018082.txt">Table of n, a(n) for n = 0..1000</a>
%t Round[Surd[13,4]^Range[0,30]] (* _Harvey P. Dale_, Apr 07 2017 *)
%t Floor[# + 1/2]&/@((Power[13, (4)^-1])^Range[0, 40]) (* _Vincenzo Librandi_, Apr 22 2017 *)
%Y Cf. A011010 (fourth root of 13).
%K nonn
%O 0,2
%A _N. J. A. Sloane_.
|
