|
%I #51 Dec 18 2021 04:13:36
%S 3,4,11,12,19,20,27,28,35,36,43,44,51,52,59,60,67,68,75,76,83,84,91,
%T 92,99,100,107,108,115,116,123,124,131,132,139,140,147,148,155,156,
%U 163,164,171,172,179,180,187,188,195,196,203,204,211,212,219,220,227
%N Numbers that are congruent to {3, 4} mod 8.
%C Union of A017101 and A017113. - _Michel Marcus_, Feb 25 2014
%C Numbers whose binary reflected Gray code (A014550) has a single trailing zero. - _Amiram Eldar_, May 17 2021
%H <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (1,1,-1).
%F a(n) = 8*n - a(n-1) - 9 (with a(1) = 3). - _Vincenzo Librandi_, Aug 06 2010
%F G.f.: x*(3+x+4*x^2)/((1-x)^2*(1+x)). - _Colin Barker_, May 13 2012
%F a(n) = (-5 - 3*(-1)^n + 8*n)/2. - _Colin Barker_, May 14 2012
%F A000120(a(n)-1) = A000120(a(n)+1) = A063787(n). - _Ilya Lopatin_ and _Juri-Stepan Gerasimov_, Feb 25 2014
%F Sum_{n>=1} (-1)^(n+1)/a(n) = (sqrt(2)-1)*Pi/16 + log(2)/4 - sqrt(2)*log(sqrt(2)+1)/8. - _Amiram Eldar_, Dec 18 2021
%p A047457:=n->(-5 - 3*(-1)^n + 8*n)/2; seq(A047457(n), n=1..100); # _Wesley Ivan Hurt_, Mar 04 2014
%t Table[(-5 - 3*(-1)^n + 8*n)/2, {n, 100}] (* _Wesley Ivan Hurt_, Mar 04 2014 *)
%t Flatten[Table[8n + {3, 4}, {n, 0, 29}]] (* _Alonso del Arte_, Mar 04 2014 *)
%Y Cf. A000120, A014550, A017101, A017113, A047456 (superset), A063787.
%K nonn,easy
%O 1,1
%A _N. J. A. Sloane_
|
