%I #6 Sep 15 2023 18:09:03
%S 1,3,4,8,14,26,48,90,167,312,582,1086,2027,3784,7063,13185,24613,
%T 45946,85770,160112,298890,557956,1041570,1944361,3629656,6775698,
%U 12648604,23611913,44077784,82282661,153602013
%N a(n) = [ tau*a(n-2) ] + a(n-1).
%t nxt[{a_,b_}]:={b,Floor[GoldenRatio*a+b]}; NestList[nxt,{1,3},30][[;;,1]] (* _Harvey P. Dale_, Sep 15 2023 *)
%K nonn
%O 0,2
%A _N. J. A. Sloane_.
|