login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A000034 Period 2: repeat [1, 2]; a(n) = 1 + (n mod 2).
(Formerly M0089)
103
1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

COMMENTS

Also continued fraction for (sqrt(3)+1)/2 (cf. A040001) and base 3 digital root of n+1 (cf. A007089, A010888). - Henry Bottomley, Jul 05 2001

The sequence 1,-2,-1,2,1,-2,-1,2,... with g.f. (1-2x)/(1+x^2) has a(n) = cos(Pi*n/2)-2*sin(Pi*n/2). - Paul Barry, Oct 18 2004

Hankel transform is [1,-3,0,0,0,0,0,0,0,...]. - Philippe Deléham, Mar 29 2007

4/33 = 0,121212... - Eric Desbiaux, Nov 03 2008

Let A be the Hessenberg matrix of order n, defined by: A[1,j]=A[i,i]:=1, A[i,i-1]=-1, and A[i,j]=0 otherwise. Then, for n>=1, a(n-1) = charpoly(A,2). - Milan Janjic, Jan 24 2010

First differences of A032766. - Tom Edgar, Jul 17 2014

Denominator of the harmonic mean of the first n triangular numbers. - Colin Barker, Nov 13 2014

REFERENCES

Jozsef Beck, Combinatorial Games, Cambridge University Press, 2008

N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

LINKS

Sean A. Irvine, Table of n, a(n) for n = 0..9999

Daniele A. Gewurz and Francesca Merola, Sequences realized as Parker vectors of oligomorphic permutation groups, J. Integer Seqs., Vol. 6, 2003.

INRIA Algorithms Project, Encyclopedia of Combinatorial Structures 383

Wikipedia, Collatz conjecture

Index entries for linear recurrences with constant coefficients, signature (0,1).

FORMULA

G.f.: (1+2*x)/(1-x^2).

a(n) = 2^((1-(-1)^n)/2) = 2^(ceiling(n/2)-floor(n/2)). - Paul Barry, Jun 03 2003

a(n) = (3-(-1)^n)/2; a(n) = 1 + (n mod 2) = 3-a(n-1) = a(n-2) = a(-n).

a(n) = gcd(n-1, n+1). - Paul Barry, Sep 16 2004

a(n) = 2*(n mod 2) + [(n+1) mod 2]. - Paolo P. Lava, Sep 20 2006

Binomial transform of A123344, inverse binomial transform of A003945. - Philippe Deléham, Jun 04 2007

a(n) = A134451(n+1). - Reinhard Zumkeller, Oct 27 2007

a(n) = if(n=0,1,if(mod(a(n-1),2)=0,a(n-1)/2,(3*a(n-1)+1)/2)). See Collatz conjecture. - Paul Barry, Mar 31 2008

a(n) = 2^n (mod 3). - Vincenzo Librandi, Feb 05 2011

a(n) = A000035(n) + 1. - M. F. Hasler, Jan 13 2012

a(n) = abs(sin(n*Pi/2)-2*cos(n*Pi/2)). - Mohammad K. Azarian, Mar 12 2012

a(n) = A010704(n) / 3. - Reinhard Zumkeller, Jul 03 2012

a(n) = floor(4/33*10^(n+1)) mod 10. - Hieronymus Fischer, Jan 03 2013

a(n) = floor(5/8*3^(n+1)) mod 3. - Hieronymus Fischer, Jan 03 2013

a(n) = floor((n+1)*3/2) - floor((n)*3/2). - Hailey R. Olafson, Jul 23 2014

a(n) = denominator(n/2). - Wesley Ivan Hurt, Sep 11 2014

Dirichlet g.f.: zeta(s)*(1 + 1/2^s). - Mats Granvik, Jul 18 2016

E.g.f.: 2*sinh(x) + cosh(x). - Ilya Gutkovskiy, Jul 18 2016

a(n) = A010693(n) - 1. - Filip Zaludek, Oct 29 2016

MAPLE

(1+2*x)/(1-x^2);

A000034 := proc(n) op((n mod 2)+1, [1, 2]) ; end proc: # R. J. Mathar, Feb 05 2011

MATHEMATICA

a[n_] := If[OddQ[n], 2, 1]; Table[a[n], {n, 0, 90}] (* Stefan Steinerberger, Apr 17 2006 *)

Nest[ Flatten[# /. {    0 -> {1}, 1 -> {2}, 2 -> {1, 2, 1}  }] &, {1}, 8] (* Robert G. Wilson v, May 20 2014 *)

PROG

(PARI) a(n)=1+n%2

(PARI) a(n)=1+bittest(n, 0) \\ M. F. Hasler, Jan 13 2012

(Haskell)

a000034 = (+ 1) . (`mod` 2)

a000034_list = cycle [1, 2]

-- Reinhard Zumkeller, Jul 03 2012, Dec 02 2011 and corrected by James Spahlinger, Oct 08 2012

(MAGMA) [1+(n mod 2) : n in [0..100]]; // Wesley Ivan Hurt, Sep 11 2014

CROSSREFS

Cf. A000035, A003945, A007089, A010704, A010888, A032766, A123344, A134451.

Cf. sequences listed in Comments section of A283393.

Sequence in context: A228826 A168361 * A040001 A134451 A229217 A167965

Adjacent sequences:  A000031 A000032 A000033 * A000035 A000036 A000037

KEYWORD

nonn,easy

AUTHOR

N. J. A. Sloane

EXTENSIONS

Better definition from M. F. Hasler, Jan 13 2012

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified March 26 21:00 EDT 2017. Contains 284137 sequences.