|
%I #27 Mar 30 2024 11:38:59
%S 1,2,3,6,9,14,17,22,25,30,33,38,41,46,49,54,57,62,65,70,73,78,81,86,
%T 89,94,97,102,105,110,113,118,121,126,129,134,137,142,145,150,153,158,
%U 161,166,169,174,177,182,185,190,193,198,201,206,209,214,217,222,225,230
%N a(n) is the least positive integer > a(n-1) and a(n) is not 2*a(i)+a(j) for 1<=i<j<n.
%C a(n) = A047452(n-2) for n > 3 because of first formula. - _Georg Fischer_, Oct 19 2018
%H <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (1,1,-1).
%F a(n) = 4n - 10 - (n mod 2), for n>3. - _Ralf Stephan_, Nov 16 2004
%F a(n) = a(n-1) + a(n-2) - a(n-3) for n > 3. - _Harvey P. Dale_, Oct 28 2012
%F G.f.: x*(1+x+2*x^3+2*x^4+2*x^5)/((1+x)*(1-x)^2). - _Georg Fischer_, May 15 2019
%t Join[{1,2,3},Table[4n-10-Mod[n,2],{n,4,60}]] (* or *)
%t LinearRecurrence[ {1,1,-1},{1,2,3,6,9,14},60]] (* _Harvey P. Dale_, Oct 28 2012 *)
%o (Python)
%o def A075123(n): return (n-2<<2)-2-(n&1) if n>3 else n # _Chai Wah Wu_, Mar 30 2024
%Y Cf. A003278, A026471, A033627, A047452, A075122.
%K nonn,easy
%O 1,2
%A _Floor van Lamoen_, Sep 02 2002
|
