|
%I #16 Jul 04 2019 03:39:51
%S 1,3,5,9,13,17,23,29,35,43,51,59,69,79,89,101,113,125,139,153,167,183,
%T 199,215,233,251,269,289,309,329,351,373,395,419,443,467,493,519,545,
%U 573,601,629,659,689,719,751,783,815,849,883,917,953,989,1025,1063,1101
%N a(n) = n - 1 + ceiling((n^2)/3); complement of A183858.
%H <a href="/index/Rec#order_05">Index entries for linear recurrences with constant coefficients</a>, signature (2,-1,1,-2,1).
%F a(n) = n - 1 + ceiling((n^2)/3).
%t a=3; b=0;
%t Table[n+Floor[(a*n+b)^(1/2)],{n,100}]
%t Table[n-1+Ceiling[(n*n-b)/a],{n,80}]
%Y Cf. A183858.
%K nonn,easy
%O 1,2
%A _Clark Kimberling_, Jan 07 2011
|
