A017569 -id:A017569 - cp's OEIS frontend

A016777 a(n) = 3*n + 1.

1, 4, 7, 10, 13, 16, 19, 22, 25, 28, 31, 34, 37, 40, 43, 46, 49, 52, 55, 58, 61, 64, 67, 70, 73, 76, 79, 82, 85, 88, 91, 94, 97, 100, 103, 106, 109, 112, 115, 118, 121, 124, 127, 130, 133, 136, 139, 142, 145, 148, 151, 154, 157, 160, 163, 166, 169, 172, 175, 178, 181, 184, 187

Offset: 0

N. J. A. Sloane, Dec 11 1996

Numbers k such that the concatenation of the first k natural numbers is not divisible by 3. E.g., 16 is in the sequence because we have 123456789101111213141516 == 1 (mod 3).
Ignoring the first term, this sequence represents the number of bonds in a hydrocarbon: a(#of carbon atoms) = number of bonds. - Nathan Savir (thoobik(AT)yahoo.com), Jul 03 2003
n such that Sum_{k=0..n} (binomial(n+k,n-k) mod 2) is even (cf. A007306). - Benoit Cloitre, May 09 2004
Hilbert series for twisted cubic curve. - Paul Barry, Aug 11 2006
If Y is a 3-subset of an n-set X then, for n >= 3, a(n-3) is the number of 3-subsets of X having at least two elements in common with Y. - Milan Janjic, Nov 23 2007
a(n) = A144390 (1, 9, 23, 43, 69, ...) - A045944 (0, 5, 16, 33, 56, ...). From successive spectra of hydrogen atom. - Paul Curtz, Oct 05 2008
Number of monomials in the n-th power of polynomial x^3+x^2+x+1. - Artur Jasinski, Oct 06 2008
A145389(a(n)) = 1. - Reinhard Zumkeller, Oct 10 2008
Union of A035504, A165333 and A165336. - Reinhard Zumkeller, Sep 17 2009
Hankel transform of A076025. - Paul Barry, Sep 23 2009
From Jaroslav Krizek, May 28 2010: (Start)
a(n) = numbers k such that the antiharmonic mean of the first k positive integers is an integer.
A169609(a(n-1)) = 1. See A146535 and A169609. Complement of A007494.
See A005408 (odd positive integers) for corresponding values A146535(a(n)). (End)
Apart from the initial term, A180080 is a subsequence; cf. A180076. - Reinhard Zumkeller, Aug 14 2010
Also the maximum number of triangles that n + 2 noncoplanar points can determine in 3D space. - Carmine Suriano, Oct 08 2010
A089911(4*a(n)) = 3. - Reinhard Zumkeller, Jul 05 2013
The number of partitions of 6*n into at most 2 parts. - Colin Barker, Mar 31 2015
For n >= 1, a(n)/2 is the proportion of oxygen for the stoichiometric combustion reaction of hydrocarbon CnH2n+2, e.g., one part propane (C3H8) requires 5 parts oxygen to complete its combustion. - Kival Ngaokrajang, Jul 21 2015
Exponents n > 0 for which 1 + x^2 + x^n is reducible. - Ron Knott, Oct 13 2016
Also the number of independent vertex sets in the n-cocktail party graph. - Eric W. Weisstein, Sep 21 2017
Also the number of (not necessarily maximal) cliques in the n-ladder rung graph. - Eric W. Weisstein, Nov 29 2017
Also the number of maximal and maximum cliques in the n-book graph. - Eric W. Weisstein, Dec 01 2017
For n>=1, a(n) is the size of any snake-polyomino with n cells. - Christian Barrientos and Sarah Minion, Feb 27 2018
The sum of two distinct terms of this sequence is never a square. See Lagarias et al. p. 167. - Michel Marcus, May 20 2018
It seems that, for any n >= 1, there exists no positive integer z such that digit_sum(a(n)*z) = digit_sum(a(n)+z). - Max Lacoma, Sep 18 2019
For n > 2, a(n-2) is the number of distinct values of the magic constant in a normal magic triangle of order n (see formula 5 in Trotter). - Stefano Spezia, Feb 18 2021
Number of 3-permutations of n elements avoiding the patterns 132, 231, 312. See Bonichon and Sun. - Michel Marcus, Aug 20 2022
Erdős & Sárközy conjecture that a set of n positive integers with property P must have some element at least a(n-1) = 3n - 2. Property P states that, for x, y, and z in the set and z < x, y, z does not divide x+y. An example of such a set is {2n-1, 2n, ..., 3n-2}. Bedert proves this for large enough n. (This is an upper bound, and is exact for all known n; I have verified it for n up to 12.) - Charles R Greathouse IV, Feb 06 2023
a(n-1) = 3*n-2 is the dimension of the vector space of all n X n tridiagonal matrices, equals the number of nonzero coefficients: n + 2*(n-1) (see Wikipedia link). - Bernard Schott, Mar 03 2023

			G.f. = 1 + 4*x + 7*x^2 + 10*x^3 + 13*x^4 + 16*x^5 + 19*x^6 + 22*x^7 + ... - _Michael Somos_, May 27 2019

W. Decker, C. Lossen, Computing in Algebraic Geometry, Springer, 2006, p. 22.
Jan Gullberg, Mathematics from the Birth of Numbers, W. W. Norton & Co., NY & London, 1997, §8.1 Terminology, p. 264.
Konrad Knopp, Theory and Application of Infinite Series, Dover, p. 269.

N. J. A. Sloane, Table of n, a(n) for n = 0..10000
Hacène Belbachir, Toufik Djellal, and Jean-Gabriel Luque, On the self-convolution of generalized Fibonacci numbers, arXiv:1703.00323 [math.CO], 2017.
Benjamin Bedert, On a problem of Erdős and Sárközy about sequences with no term dividing the sum of two larger terms, arXiv preprint, arXiv:2301.07065 [math.NT], 2023.
Nicolas Bonichon and Pierre-Jean Morel, Baxter d-permutations and other pattern avoiding classes, arXiv:2202.12677 [math.CO], 2022.
Paul Erdős and András Sárközy, On the divisibility properties of sequences of integers, Proc. London Math. Soc. (3), 21 (1970), pp. 97-101.
Leonhard Euler, Observatio de summis divisorum p. 9.
Leonhard Euler, An observation on the sums of divisors, arXiv:math/0411587 [math.HO], 2004-2009, see p. 9.
L. B. W. Jolley, Summation of Series, Dover, 1961, pp. 16, 38.
Tanya Khovanova, Recursive Sequences
Konrad Knopp, Theorie und Anwendung der unendlichen Reihen, Berlin, J. Springer, 1922. (Original German edition of "Theory and Application of Infinite Series")
J. C. Lagarias, A. M. Odlyzko, and J. B. Shearer, On the density of sequences of integers the sum of no two of which is a square. I. Arithmetic progressions, Journal of Combinatorial Theory. Series A, 33 (1982), pp. 167-185.
T. Mansour, Permutations avoiding a set of patterns from S_3 and a pattern from S_4, arXiv:math/9909019 [math.CO], 1999.
Luis Manuel Rivera, Integer sequences and k-commuting permutations, arXiv preprint arXiv:1406.3081 [math.CO], 2014.
Nathan Sun, On d-permutations and Pattern Avoidance Classes, arXiv:2208.08506 [math.CO], 2022.
Terrel Trotter, Normal Magic Triangles of Order n, Journal of Recreational Mathematics Vol. 5, No. 1, 1972, pp. 28-32.
Eric Weisstein's World of Mathematics, Book Graph
Eric Weisstein's World of Mathematics, Clique
Eric Weisstein's World of Mathematics, Cocktail Party Graph
Eric Weisstein's World of Mathematics, Independent Vertex Set
Eric Weisstein's World of Mathematics, Ladder Rung Graph
Eric Weisstein's World of Mathematics, Maximal Clique
Eric Weisstein's World of Mathematics, Maximum Clique
Wikipedia, Tridiagonal matrix.
Chengcheng Yang, A Problem of Erdös Concerning Lattice Cubes, arXiv:2011.15010 [math.CO], 2020. See Table p. 27.
Index entries for linear recurrences with constant coefficients, signature (2,-1).

Cf. A000290, A001477, A005408, A007306, A007494, A016789, A016933.
Cf. A017569, A035504, A045944, A058183, A076025, A089911, A144390.
Cf. A145389, A146535, A165333, A165336, A169609, A180076, A180080.
Cf. A214550, A238731.
Cf. A007559 (partial products), A051536 (lcm).
First differences of A000326.
Row sums of A131033.
Complement of A007494. - Reinhard Zumkeller, Oct 10 2008
Some subsequences: A002476 (primes), A291745 (nonprimes), A135556 (squares), A016779 (cubes).

a016777 = (+ 1) . (* 3)
a016777_list = [1, 4 ..]  -- Reinhard Zumkeller, Feb 28 2013, Feb 10 2012

[3*n+1 : n in [1..70]]; // Sergei Haller (sergei(AT)sergei-haller.de), Dec 21 2006

Range[1, 199, 3] (* Vladimir Joseph Stephan Orlovsky, May 26 2011 *)
(* Start from Eric W. Weisstein, Sep 21 2017 *)
3 Range[0, 70] + 1
Table[3 n + 1, {n, 0, 70}]
LinearRecurrence[{2, -1}, {1, 4}, 70]
CoefficientList[Series[(1 + 2 x)/(-1 + x)^2, {x, 0, 70}], x]
(* End *)

A016777(n):=3*n+1$
makelist(A016777(n),n,0,30); /* Martin Ettl, Oct 31 2012 */

a(n)=3*n+1 \\ Charles R Greathouse IV, Jul 28 2015

[3*n+1 for n in range(1,71)] # G. C. Greubel, Mar 15 2024

G.f.: (1+2*x)/(1-x)^2.
a(n) = A016789(n) - 1.
a(n) = 3 + a(n-1).
Sum_{n>=1} (-1)^n/a(n) = (1/3)*(Pi/sqrt(3) + log(2)). [Jolley, p. 16, (79)] - Benoit Cloitre, Apr 05 2002
(1 + 4*x + 7*x^2 + 10*x^3 + ...) = (1 + 2*x + 3*x^2 + ...)/(1 - 2*x + 4*x^2 - 8*x^3 + ...). - Gary W. Adamson, Jul 03 2003
E.g.f.: exp(x)*(1+3*x). - Paul Barry, Jul 23 2003
a(n) = 2*a(n-1) - a(n-2); a(0)=1, a(1)=4. - Philippe Deléham, Nov 03 2008
a(n) = 6*n - a(n-1) - 1 (with a(0) = 1). - Vincenzo Librandi, Nov 20 2010
Sum_{n>=0} 1/a(n)^2 = A214550. - R. J. Mathar, Jul 21 2012
a(n) = A238731(n+1,n) = (-1)^n*Sum_{k = 0..n} A238731(n,k)*(-5)^k. - Philippe Deléham, Mar 05 2014
Sum_{i=0..n} (a(i)-i) = A000290(n+1). - Ivan N. Ianakiev, Sep 24 2014
From Wolfdieter Lang, Mar 09 2018: (Start)
a(n) = denominator(Sum_{k=0..n-1} 1/(a(k)*a(k+1))), with the numerator n = A001477(n), where the sum is set to 0 for n = 0. [Jolley, p. 38, (208)]
G.f. for {n/(1 + 3*n)}_{n >= 0} is (1/3)*(1-hypergeom([1, 1], [4/3], -x/(1-x)))/(1-x). (End)
a(n) = -A016789(-1-n) for all n in Z. - Michael Somos, May 27 2019

Better description from T. D. Noe, Aug 15 2002

Partially edited by Joerg Arndt, Mar 11 2010

A016933 a(n) = 6*n + 2.

Original entry on oeis.org

2, 8, 14, 20, 26, 32, 38, 44, 50, 56, 62, 68, 74, 80, 86, 92, 98, 104, 110, 116, 122, 128, 134, 140, 146, 152, 158, 164, 170, 176, 182, 188, 194, 200, 206, 212, 218, 224, 230, 236, 242, 248, 254, 260, 266, 272, 278, 284, 290, 296, 302, 308, 314, 320, 326

Offset: 0

N. J. A. Sloane

Number of 3 X n binary matrices avoiding simultaneously the right angled numbered polyomino patterns (ranpp) (00;1), (01;0), (10;0) and (11;0). An occurrence of a ranpp (xy;z) in a matrix A=(a(i,j)) is a triple (a(i1,j1), a(i1,j2), a(i2,j1)) where i1Sergey Kitaev, Nov 11 2004
Exponents n>1 for which 1 - x + x^n is reducible. - Ron Knott, Oct 13 2016
For the Collatz problem, these are the descenders' values that require division by 2. - Fred Daniel Kline, Jan 19 2017
For n > 3, also the number of (not necessarily maximal) cliques in the n-helm graph. - Eric W. Weisstein, Nov 29 2017

Michael De Vlieger, Table of n, a(n) for n = 0..10000
Gennady Eremin, Infinite matrix of odd natural numbers. A bit about Sophie Germain prime numbers, arXiv:2501.17090 [math.GM], 2025. See p. 9.
Tanya Khovanova, Recursive Sequences.
Sergey Kitaev, On multi-avoidance of right angled numbered polyomino patterns, Integers: Electronic Journal of Combinatorial Number Theory, Vol. 4 (2004), Article A21, 20pp.
Sergey Kitaev, On multi-avoidance of right angled numbered polyomino patterns, University of Kentucky Research Reports (2004).
Luis Manuel Rivera, Integer sequences and k-commuting permutations, arXiv preprint arXiv:1406.3081 [math.CO], 2014.
Eric Weisstein's World of Mathematics, Clique.
Eric Weisstein's World of Mathematics, Helm Graph.
Index entries for linear recurrences with constant coefficients, signature (2,-1).

Cf. A008588, A016921, A016945, A016957, A016969, A017569, A016777, A016813.

a016933 = (+ 2) . (* 6)  -- Reinhard Zumkeller, Jul 05 2013

a[1]:=2:for n from 2 to 100 do a[n]:=a[n-1]+6 od: seq(a[n], n=1..47); # Zerinvary Lajos, Mar 16 2008

Range[2, 500, 6] (* Vladimir Joseph Stephan Orlovsky, May 26 2011 *)
Table[6 n + 2, {n, 0, 20}] (* Eric W. Weisstein, Nov 29 2017 *)
6 Range[0, 20] + 2 (* Eric W. Weisstein, Nov 29 2017 *)
LinearRecurrence[{2, -1}, {8, 14}, {0, 20}] (* Eric W. Weisstein, Nov 29 2017 *)
CoefficientList[Series[2 (1 + 2 x)/(-1 + x)^2, {x, 0, 20}], x] (* Eric W. Weisstein, Nov 29 2017 *)

a(n)=6*n+2 \\ Charles R Greathouse IV, Jul 10 2016

[i+2 for i in range(280) if gcd(i,6) == 6] # Zerinvary Lajos, May 20 2009

A008615(a(n)) = n+1. - Reinhard Zumkeller, Feb 27 2008
A157176(a(n)) = A013730(n). - Reinhard Zumkeller, Feb 24 2009
A089911(2*a(n)) = 3. - Reinhard Zumkeller, Jul 05 2013
a(n) = 2*(6*n-1) - a(n-1) (with a(0)=2). - Vincenzo Librandi, Nov 20 2010
G.f.: 2*(1+2*x)/(1-x)^2. - Colin Barker, Jan 08 2012
a(n) = (3 * A016813(n) + 1) / 2.- Fred Daniel Kline, Jan 20 2017
a(n) = A016789(A005843(n)). - Felix Fröhlich, Jan 20 2017
Sum_{n>=0} (-1)^n/a(n) = sqrt(3)*Pi/18 + log(2)/6. - Amiram Eldar, Dec 10 2021
a(n) = 2 * A016777(n). - Alois P. Heinz, Dec 27 2023
From Elmo R. Oliveira, Mar 08 2024: (Start)
a(n) = 2*a(n-1) - a(n-2) for n >= 2.
E.g.f.: 2*exp(x)*(1 + 3*x). (End)

A017293 a(n) = 10*n + 2.

Original entry on oeis.org

2, 12, 22, 32, 42, 52, 62, 72, 82, 92, 102, 112, 122, 132, 142, 152, 162, 172, 182, 192, 202, 212, 222, 232, 242, 252, 262, 272, 282, 292, 302, 312, 322, 332, 342, 352, 362, 372, 382, 392, 402, 412, 422, 432, 442, 452, 462, 472, 482, 492, 502, 512, 522, 532

Offset: 0

N. J. A. Sloane, Dec 11 1996

Number of 5 X n 0-1 matrices avoiding simultaneously the right angled numbered polyomino patterns (ranpp) (00;1), (01;0), (11;0) and (01;1). An occurrence of a ranpp (xy;z) in a matrix A=(a(i,j)) is a triple (a(i1,j1), a(i1,j2), a(i2,j1)) where i1A008574; m=3: A016933; m=4: A022144; m=6: A017569. - Sergey Kitaev, Nov 13 2004

Vincenzo Librandi, Table of n, a(n) for n = 0..5000
Tanya Khovanova, Recursive Sequences.
Sergey Kitaev, On multi-avoidance of right angled numbered polyomino patterns, Integers: Electronic Journal of Combinatorial Number Theory 4 (2004), A21, 20pp.
Index entries for linear recurrences with constant coefficients, signature (2,-1).

Subsequence of A034709, together with A017281, A139222, A139245, A017329, A139249, A139264, A139279 and A139280.

Cf. A008574, A008592, A016861, A016873, A016933, A017569, A022144.

[10*n+2: n in [0..50]]; // Vincenzo Librandi, May 04 2011

A017293:=n->10*n+2; seq(A017293(n), n=0..100); # Wesley Ivan Hurt, May 03 2014

Range[2, 1000, 10] (* Vladimir Joseph Stephan Orlovsky, May 28 2011 *)
CoefficientList[Series[(2 + 8 x) / (1 - x)^2, {x, 0, 30}], x] (* Vincenzo Librandi, Jul 23 2016 *)
10 Range[0,60]+2 (* or *) LinearRecurrence[{2,-1},{2,12},60] (* Harvey P. Dale, Jul 04 2019 *)

a(n) = 2*A016861(n) = A008592(n) + 2. - Wesley Ivan Hurt, May 03 2014
G.f.: 2*(1 + 4*x)/(1-x)^2. - Vincenzo Librandi, Jul 23 2016
From Elmo R. Oliveira, Apr 04 2025: (Start)
E.g.f.: 2*exp(x)*(1 + 5*x).
a(n) = 2*a(n-1) - a(n-2) for n >= 2.
a(n) = A016873(2*n). (End)

A033579 Four times pentagonal numbers: a(n) = 2n(3*n-1).

Original entry on oeis.org

0, 4, 20, 48, 88, 140, 204, 280, 368, 468, 580, 704, 840, 988, 1148, 1320, 1504, 1700, 1908, 2128, 2360, 2604, 2860, 3128, 3408, 3700, 4004, 4320, 4648, 4988, 5340, 5704, 6080, 6468, 6868, 7280, 7704, 8140, 8588, 9048, 9520, 10004, 10500, 11008, 11528, 12060

Offset: 0

N. J. A. Sloane

Subsequence of A062717: A010052(6*a(n)+1) = 1. - Reinhard Zumkeller, Feb 21 2011

Sequence found by reading the line from 0, in the direction 0, 4, ..., in the square spiral whose vertices are the generalized pentagonal numbers A001318. - Omar E. Pol, Sep 08 2011

Ivan Panchenko, Table of n, a(n) for n = 0..1000
Eric Weisstein's World of Mathematics, Pentagonal Number.
Wikipedia, Pentagonal number.
Index entries for linear recurrences with constant coefficients, signature (3,-3,1).

Cf. A000326, A001318, A014642, A033579, A033580, A033581, A049450, A186423.

List([0..45], n-> 4*Binomial(3*n,2)/3 ); # G. C. Greubel, Oct 09 2019

[4*Binomial(3*n,2)/3: n in [0..45]]; // G. C. Greubel, Oct 09 2019

seq(4*binomial(3*n,2)/3, n=0..45); # G. C. Greubel, Oct 09 2019

4 PolygonalNumber[5, Range[0, 45]] (* Michael De Vlieger, Aug 02 2016, Version 10.4 *)

a(n)=2*n*(3*n-1) \\ Charles R Greathouse IV, Jun 28 2013

[4*binomial(3*n,2)/3 for n in (0..45)] # G. C. Greubel, Oct 09 2019

a(n) = 4*n*(3*n-1)/2 = 6*n^2 - 2*n = 4*A000326(n). - Omar E. Pol, Dec 11 2008
a(n) = 2*A049450(n). - Omar E. Pol, Dec 13 2008
a(n) = a(n-1) + 12*n - 8 for n > 0, a(0)=0. - Vincenzo Librandi, Aug 05 2010
a(n) = A014642(n)/2. - Omar E. Pol, Aug 19 2011
G.f.: x*(4+8*x)/(1-3*x+3*x^2-x^3). - Colin Barker, Jan 06 2012
a(n) = A191967(2*n). - Reinhard Zumkeller, Jul 07 2012
a(n) = A181617(n+1) - A181617(n). - J. M. Bergot, Jun 28 2013
a(n) = (A174371(n) - 1)/6. - Miquel Cerda, Jul 28 2016
From Ilya Gutkovskiy, Jul 28 2016: (Start)
E.g.f.: 2*x*(2 + 3*x)*exp(x).
a(n+1) = Sum_{k=0..n} A017569(k).
Sum_{i>0} 1/a(i) = (9*log(3) - sqrt(3)*Pi)/12 = 0.3705093754425278... (End)
Sum_{n>=1} (-1)^(n+1)/a(n) = Pi/(2*sqrt(3)) - log(2). - Amiram Eldar, Feb 20 2022

More terms from Michel Marcus, Mar 04 2014

A089911 a(n) = Fibonacci(n) mod 12.

Original entry on oeis.org

0, 1, 1, 2, 3, 5, 8, 1, 9, 10, 7, 5, 0, 5, 5, 10, 3, 1, 4, 5, 9, 2, 11, 1, 0, 1, 1, 2, 3, 5, 8, 1, 9, 10, 7, 5, 0, 5, 5, 10, 3, 1, 4, 5, 9, 2, 11, 1, 0, 1, 1, 2, 3, 5, 8, 1, 9, 10, 7, 5, 0, 5, 5, 10, 3, 1, 4, 5, 9, 2, 11, 1, 0, 1, 1, 2, 3, 5, 8, 1, 9, 10, 7, 5, 0, 5, 5, 10, 3, 1, 4, 5, 9, 2, 11, 1, 0, 1, 1

Offset: 0

Casey Mongoven, Nov 14 2003

From Reinhard Zumkeller, Jul 05 2013: (Start)
Sequence has been applied by several composers to 12-tone equal temperament pitch structure. The complete Fibonacci mod 12 system (a set of 10 periodic sequences) exhausts all possible ordered dyads; that is, every possible combination of two pitches is found in these sets.
a(A008594(n)) = 0;
a(A227144(n)) = 1;
a(3*A047522(n)) = 2;
a(A017569(n)) = a(2*A016933(n)) = a(4*A016777(n)) = 3;
a(2*A017629(n)) = a(3*A017137(n)) = a(6*A004767(n)) = 4;
a(A227146(n)) = 5;
a(nonexistent) = 6;
a(2*A017581(n)) = 7;
a(2*A017557(n)) = a(4*A016813(n)) = 8;
a(A017617(n)) = a(2*A016957(n)) = a(4*A016789(n)) = 9;
a(3*A047621(n)) = 10;
a(2*A017653(n)) = 11. (End)

Reinhard Zumkeller, Table of n, a(n) for n = 0..1199
Ron Knott, Fibonacci Numbers and the Golden Section
M. Renault, The Fibonacci Sequence Modulo M
A. P. Shah, Fibonacci Sequence Modulo m, Fibonacci Quarterly, Vol.6, No.2 (1968), 139-141.
D. D. Wall, Fibonacci series modulo m, Amer. Math. Monthly, 67 (1960), 525-532.
Index entries for linear recurrences with constant coefficients, signature (1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1).

Cf. A000045, A001175, A003893, A010881.

a089911 n = a089911_list !! n
a089911_list = 0 : 1 : zipWith (\u v -> (u + v) `mod` 12)
                       (tail a089911_list) a089911_list
-- Reinhard Zumkeller, Jul 01 2013

[Fibonacci(n) mod 12: n in [0..100]]; // Vincenzo Librandi, Feb 04 2014

with(combinat,fibonacci); A089911 := proc(n) fibonacci(n) mod 12; end;

Table[Mod[Fibonacci[n], 12], {n, 0, 100}] (* Vincenzo Librandi, Feb 04 2014 *)

a(n)=fibonacci(n)%12 \\ Charles R Greathouse IV, Feb 03 2014

Has period of 24, restricted period 12 and multiplier 5.

a(n) = (a(n-1) + a(n-2)) mod 12, a(0) = 0, a(1) = 1.

More terms from Ray Chandler, Nov 15 2003

A092259 Numbers that are congruent to {4, 8} mod 12.

Original entry on oeis.org

4, 8, 16, 20, 28, 32, 40, 44, 52, 56, 64, 68, 76, 80, 88, 92, 100, 104, 112, 116, 124, 128, 136, 140, 148, 152, 160, 164, 172, 176, 184, 188, 196, 200, 208, 212, 220, 224, 232, 236, 244, 248, 256, 260, 268, 272, 280, 284, 292, 296, 304, 308, 316, 320, 328, 332

Offset: 1

Giovanni Teofilatto, Feb 19 2004

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

Cf. A001651, A017617, A017569, A069587, A092899, A145439, A157697.

Fourth row of A092260.

[n : n in [0..400] | n mod 12 in [4, 8]]; // Wesley Ivan Hurt, May 21 2016

A092259:=n->6*n-3-(-1)^n: seq(A092259(n), n=1..100); # Wesley Ivan Hurt, May 21 2016

Table[6n-3-(-1)^n, {n, 80}] (* Wesley Ivan Hurt, May 21 2016 *)
LinearRecurrence[{1,1,-1},{4,8,16},60] (* Harvey P. Dale, Oct 07 2021 *)

G.f.: 4*x*(1+x+x^2) / ( (1+x)*(x-1)^2 ).
a(n) = 4 * A001651(n).
Iff phi(n) = phi(3n/2), then n is in A069587. - Labos Elemer, Feb 25 2004
a(n) = 12*(n-1)-a(n-1) (with a(1)=4). - Vincenzo Librandi, Nov 16 2010
From Wesley Ivan Hurt, May 21 2016: (Start)
a(n) = a(n-1) + a(n-2) - a(n-3) for n>3.
a(n) = 6n - 3 - (-1)^n.
a(2n) = A017617(n-1) for n>1, a(2n-1) = A017569(n-1) for n>1.
a(n) = -a(1-n), a(n) = A092899(n) + 1 for n>0. (End)
Sum_{n>=1} (-1)^(n+1)/a(n) = Pi*sqrt(3)/36. - Amiram Eldar, Dec 30 2021
From Amiram Eldar, Nov 24 2024: (Start)
Product_{n>=1} (1 - (-1)^n/a(n)) = 1/sqrt(2) + 1/sqrt(6) (A145439).
Product_{n>=1} (1 + (-1)^n/a(n)) = sqrt(2/3) (A157697). (End)

Edited and extended by Ray Chandler, Feb 21 2004

A332513 Numbers k such that phi(k) == 4 (mod 12), where phi is the Euler totient function (A000010).

Original entry on oeis.org

5, 8, 10, 12, 17, 29, 32, 34, 40, 41, 48, 53, 55, 58, 60, 75, 82, 85, 88, 89, 100, 101, 106, 110, 113, 115, 125, 128, 132, 136, 137, 145, 149, 150, 160, 170, 173, 178, 184, 187, 192, 197, 202, 204, 205, 226, 230, 232, 233, 235, 240, 250, 253, 257, 265, 269, 274

Offset: 1

Amiram Eldar, Feb 14 2020

nonn

Dence and Pomerance showed that the asymptotic number of the terms below x is ~ c1 * x/sqrt(log(x)), where c1 = (sqrt(2*sqrt(3))/(3*Pi)) * c3^(-1/2) * (2*c3 + c4) = 0.6109136202..., c3 = Product_{primes p == 2 (mod 3)} (1 + 1/(p^2-1)), and c4 = Product_{primes p == 2 (mod 3)} (1 - 1/(p+1)^2).

			17 is a term since phi(17) = 16 == 4 (mod 12).

Amiram Eldar, Table of n, a(n) for n = 1..10000
Thomas Dence and Carl Pomerance, Euler's function in residue classes, in: K. Alladi, P. D. T. A. Elliott, A. Granville and G. Tenenbaum (eds.), Analytic and Elementary Number Theory, Developments in Mathematics, Vol. 1, Springer, Boston, MA, 1998, pp. 7-20, alternative link.

Cf. A000010, A017569, A175646, A332511, A332512, A332514, A332515, A332516.

[k:k in [1..300]| EulerPhi(k) mod 12 eq 4]; // Marius A. Burtea, Feb 14 2020

Select[Range[300], Mod[EulerPhi[#], 12] == 4 &]

A166304 Third trisection of A022998.

Original entry on oeis.org

4, 5, 16, 11, 28, 17, 40, 23, 52, 29, 64, 35, 76, 41, 88, 47, 100, 53, 112, 59, 124, 65, 136, 71, 148, 77, 160, 83, 172, 89, 184, 95, 196, 101, 208, 107, 220, 113, 232, 119, 244, 125, 256, 131, 268, 137, 280, 143, 292, 149, 304, 155, 316, 161, 328, 167, 340, 173, 352, 179

Offset: 0

Paul Curtz, Oct 11 2009

The sequence read modulo 9 is the periodic sequence 4, 5, 7, 2, 1, 8 (repeat..)
The same set of numbers in a period of length 6 is in A153130,
A165355 read modulo 9, A165367 read modulo 9, and A166138 read modulo 9.

G. C. Greubel, Table of n, a(n) for n = 0..10000
Index entries for linear recurrences with constant coefficients, signature (0, 2, 0, -1).

Cf. A165988 (first trisection), A166138 (2nd trisection).

LinearRecurrence[{0, 2, 0, -1}, {4, 5, 16, 11}, 100] (* G. C. Greubel, May 09 2016 *)

a(n) = A022998(3*n+2).
a(n) = 2*a(n-2)-a(n-4).
G.f.: (4+5*x+8*x^2+x^3)/((x-1)^2 *(1+x)^2 ).
a(2*n) = A017569(n). a(2n+1) = A016969(n) .

Edited and extended by R. J. Mathar, Oct 14 2009

A087229 Exponent of p=2 in 12n+4 = 3(4n+1)+1.

Original entry on oeis.org

2, 4, 2, 3, 2, 6, 2, 3, 2, 4, 2, 3, 2, 5, 2, 3, 2, 4, 2, 3, 2, 8, 2, 3, 2, 4, 2, 3, 2, 5, 2, 3, 2, 4, 2, 3, 2, 6, 2, 3, 2, 4, 2, 3, 2, 5, 2, 3, 2, 4, 2, 3, 2, 7, 2, 3, 2, 4, 2, 3, 2, 5, 2, 3, 2, 4, 2, 3, 2, 6, 2, 3, 2, 4, 2, 3, 2, 5, 2, 3, 2, 4, 2, 3, 2, 10, 2, 3, 2, 4, 2, 3, 2, 5, 2, 3, 2, 4, 2, 3, 2, 6, 2, 3, 2, 4

Offset: 0

Labos Elemer, Aug 28 2003

nonn

In the Collatz trajectory of m=4n+1, the first 3x+1 step is followed by a(n) consecutive divide-by-2 steps.

Large shifted overlaps with A085058.

			n=85: m = 4*n + 1 = 4*85 + 1 = 341, whose Collatz trajectory begins with 341 -> 1024 followed by a(85)=10 consecutive halving steps.

Antti Karttunen, Table of n, a(n) for n = 0..21845
Antti Karttunen, Data supplement: n, a(n) computed for n = 1..65537

Cf. A007814, A085058, A017569.

Table[Part[Part[FactorInteger[12*w+4],1],2], {w,0,100}]
Table[IntegerExponent[12*n + 4, 2], {n, 0, 100}] (* Amiram Eldar, Feb 03 2022 *)

A087229(n) = valuation((12*n)+4,2); \\ Antti Karttunen, Oct 09 2018

# In 4*n+1 (n>0), find position of first bit that will repeat.
sub a {
  my $nv= ((shift() << 2) | 1);
  my $bp= 1;
  while (($nv & 1) xor ($nv & 2)) {
    $nv>>= 1;
    $bp++;
  }
  return $bp;
}
# Ruud H.G. van Tol, Sep 27 2021

a(n) = A007814(A017569(n)). - Antti Karttunen, Oct 09 2018

Asymptotic mean: Limit_{m->oo} (1/m) * Sum_{k=1..m} a(k) = 3. - Amiram Eldar, Aug 30 2024

Part of the name moved to comments section by Antti Karttunen, Oct 09 2018

a(0) = 2 prepended by Ihar Senkevich, Feb 05 2022

cp's OEIS Frontend

A016777 a(n) = 3*n + 1.

Views

Author

Keywords

Comments

Examples

References

Links

Crossrefs

Programs

Haskell

Magma

Mathematica

Maxima

PARI

SageMath

Formula

Extensions

A016933 a(n) = 6*n + 2.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Haskell

Maple

Mathematica

PARI

Sage

Formula

A017293 a(n) = 10*n + 2.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Magma

Maple

Mathematica

Formula

A033579 Four times pentagonal numbers: a(n) = 2*n*(3*n-1).

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

GAP

Magma

Maple

Mathematica

PARI

Sage

Formula

Extensions

A089911 a(n) = Fibonacci(n) mod 12.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Haskell

Magma

Maple

Mathematica

PARI

Formula

Extensions

A092259 Numbers that are congruent to {4, 8} mod 12.

Views

Author

Keywords

A033579 Four times pentagonal numbers: a(n) = 2n(3*n-1).