# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a093719
Showing 1-1 of 1

%I A093719 #44 Jul 26 2024 16:15:16
%S A093719 1,1,0,1,0,1,1,1,0,1,0,1,1,1,0,1,0,1,1,1,0,1,0,1,1,1,0,1,0,1,1,1,0,1,
%T A093719 0,1,1,1,0,1,0,1,1,1,0,1,0,1,1,1,0,1,0,1,1,1,0,1,0,1,1,1,0,1,0,1,1,1,
%U A093719 0,1,0,1,1,1,0,1,0,1,1,1,0,1,0,1,1,1,0,1,0,1,1,1,0,1,0,1,1,1,0,1,0,1
%N A093719 a(n) = (n mod 2)^(n mod 3).
%C A093719 This is a periodic sequence with period 6. The repeating block is 1,1,0,1,0,1. - _Michel Dekking_, Sep 19 2020
%H A093719 Antti Karttunen, <a href="/A093719/b093719.txt">Table of n, a(n) for n = 0..65537</a>
%H A093719 <a href="/index/Ch#char_fns">Index entries for characteristic functions</a>
%H A093719 <a href="/index/Rec#order_06">Index entries for linear recurrences with constant coefficients</a>, signature (0,0,0,0,0,1).
%F A093719 a(n) = A000035(n)^A010872(n).
%F A093719 a(A047273(n)) = 1, a(A047235(n)) = 0. [_Reinhard Zumkeller_, Oct 01 2008]
%F A093719 G.f.: -(x^5 + x^3 + x + 1)/(x^6 - 1). - _Colin Barker_, Apr 01 2013
%F A093719 E.g.f.: (2*cos(sqrt(3)*x/2)*cosh(x/2) + cosh(x))/3 + sinh(x). - _Stefano Spezia_, Jul 26 2024
%p A093719 A093719:=n->(n mod 2)^(n mod 3): seq(A093719(n), n=0..40); # _Wesley Ivan Hurt_, Oct 13 2014
%t A093719 PadRight[{},120,{1,1,0,1,0,1}] (* _Harvey P. Dale_, Jun 26 2021 *)
%o A093719 (Magma) [(n mod 2)^(n mod 3): n in [0..100]]; // _Wesley Ivan Hurt_, Oct 13 2014
%o A093719 (PARI) A093719(n) = ((n%2)^(n%3)); \\ _Antti Karttunen_, Dec 19 2018
%o A093719 (GAP) List([0..120],n->(n mod 2)^(n mod 3)); # _Muniru A Asiru_, Dec 19 2018
%Y A093719 Cf. A000035, A010872, A047235, A047273, A093718.
%K A093719 nonn,easy
%O A093719 0,1
%A A093719 _Reinhard Zumkeller_, Apr 12 2004

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE