cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-10 of 12 results. Next

A000290 The squares: a(n) = n^2.

Original entry on oeis.org

0, 1, 4, 9, 16, 25, 36, 49, 64, 81, 100, 121, 144, 169, 196, 225, 256, 289, 324, 361, 400, 441, 484, 529, 576, 625, 676, 729, 784, 841, 900, 961, 1024, 1089, 1156, 1225, 1296, 1369, 1444, 1521, 1600, 1681, 1764, 1849, 1936, 2025, 2116, 2209, 2304, 2401, 2500
Offset: 0

Views

Author

N. J. A. Sloane

Keywords

Comments

To test if a number is a square, see Cohen, p. 40. - N. J. A. Sloane, Jun 19 2011
Zero followed by partial sums of A005408 (odd numbers). - Jeremy Gardiner, Aug 13 2002
Begin with n, add the next number, subtract the previous number and so on ending with subtracting a 1: a(n) = n + (n+1) - (n-1) + (n+2) - (n-2) + (n+3) - (n-3) + ... + (2n-1) - 1 = n^2. - Amarnath Murthy, Mar 24 2004
Sum of two consecutive triangular numbers A000217. - Lekraj Beedassy, May 14 2004
Numbers with an odd number of divisors: {d(n^2) = A048691(n); for the first occurrence of 2n + 1 divisors, see A071571(n)}. - Lekraj Beedassy, Jun 30 2004
See also A000037.
First sequence ever computed by electronic computer, on EDSAC, May 06 1949 (see Renwick link). - Russ Cox, Apr 20 2006
Numbers k such that the imaginary quadratic field Q(sqrt(-k)) has four units. - Marc LeBrun, Apr 12 2006
For n > 0: number of divisors of (n-1)th power of any squarefree semiprime: a(n) = A000005(A006881(k)^(n-1)); a(n) = A000005(A000400(n-1)) = A000005(A011557(n-1)) = A000005(A001023(n-1)) = A000005(A001024(n-1)). - Reinhard Zumkeller, Mar 04 2007
If a 2-set Y and an (n-2)-set Z are disjoint subsets of an n-set X then a(n-2) is the number of 3-subsets of X intersecting both Y and Z. - Milan Janjic, Sep 19 2007
Numbers a such that a^1/2 + b^1/2 = c^1/2 and a^2 + b = c. - Cino Hilliard, Feb 07 2008 (this comment needs clarification, Joerg Arndt, Sep 12 2013)
Numbers k such that the geometric mean of the divisors of k is an integer. - Ctibor O. Zizka, Jun 26 2008
Equals row sums of triangle A143470. Example: 36 = sum of row 6 terms: (23 + 7 + 3 + 1 + 1 + 1). - Gary W. Adamson, Aug 17 2008
Equals row sums of triangles A143595 and A056944. - Gary W. Adamson, Aug 26 2008
Number of divisors of 6^(n-1) for n > 0. - J. Lowell, Aug 30 2008
Denominators of Lyman spectrum of hydrogen atom. Numerators are A005563. A000290-A005563 = A000012. - Paul Curtz, Nov 06 2008
a(n) is the number of all partitions of the sum 2^2 + 2^2 + ... + 2^2, (n-1) times, into powers of 2. - Valentin Bakoev, Mar 03 2009
a(n) is the maximal number of squares that can be 'on' in an n X n board so that all the squares turn 'off' after applying the operation: in any 2 X 2 sub-board, a square turns from 'on' to 'off' if the other three are off. - Srikanth K S, Jun 25 2009
Zero together with the numbers k such that 2 is the number of perfect partitions of k. - Juri-Stepan Gerasimov, Sep 26 2009
Totally multiplicative sequence with a(p) = p^2 for prime p. - Jaroslav Krizek, Nov 01 2009
Satisfies A(x)/A(x^2), A(x) = A173277: (1, 4, 13, 32, 74, ...). - Gary W. Adamson, Feb 14 2010
Positive members are the integers with an odd number of odd divisors and an even number of even divisors. See also A120349, A120359, A181792, A181793, A181795. - Matthew Vandermast, Nov 14 2010
Besides the first term, this sequence is the denominator of Pi^2/6 = 1 + 1/4 + 1/9 + 1/16 + 1/25 + 1/36 + ... . - Mohammad K. Azarian, Nov 01 2011
Partial sums give A000330. - Omar E. Pol, Jan 12 2013
Drmota, Mauduit, and Rivat proved that the Thue-Morse sequence along the squares is normal; see A228039. - Jonathan Sondow, Sep 03 2013
a(n) can be decomposed into the sum of the four numbers [binomial(n, 1) + binomial(n, 2) + binomial(n-1, 1) + binomial(n-1, 2)] which form a "square" in Pascal's Triangle A007318, or the sum of the two numbers [binomial(n, 2) + binomial(n+1, 2)], or the difference of the two numbers [binomial(n+2, 3) - binomial(n, 3)]. - John Molokach, Sep 26 2013
In terms of triangular tiling, the number of equilateral triangles with side length 1 inside an equilateral triangle with side length n. - K. G. Stier, Oct 30 2013
Number of positive roots in the root systems of type B_n and C_n (when n > 1). - Tom Edgar, Nov 05 2013
Squares of squares (fourth powers) are also called biquadratic numbers: A000583. - M. F. Hasler, Dec 29 2013
For n > 0, a(n) is the largest integer k such that k^2 + n is a multiple of k + n. More generally, for m > 0 and n > 0, the largest integer k such that k^(2*m) + n is a multiple of k + n is given by k = n^(2*m). - Derek Orr, Sep 03 2014
For n > 0, a(n) is the number of compositions of n + 5 into n parts avoiding the part 2. - Milan Janjic, Jan 07 2016
a(n), for n >= 3, is also the number of all connected subtrees of a cycle graph, having n vertices. - Viktar Karatchenia, Mar 02 2016
On every sequence of natural continuous numbers with an even number of elements, the summatory of the second half of the sequence minus the summatory of the first half of the sequence is always a square. Example: Sequence from 61 to 70 has an even number of elements (10). Then 61 + 62 + 63 + 64 + 65 = 315; 66 + 67 + 68 + 69 + 70 = 340; 340 - 315 = 25. (n/2)^2 for n = number of elements. - César Aguilera, Jun 20 2016
On every sequence of natural continuous numbers from n^2 to (n+1)^2, the sum of the differences of pairs of elements of the two halves in every combination possible is always (n+1)^2. - César Aguilera, Jun 24 2016
Suppose two circles with radius 1 are tangent to each other as well as to a line not passing through the point of tangency. Create a third circle tangent to both circles as well as the line. If this process is continued, a(n) for n > 0 is the reciprocals of the radii of the circles, beginning with the largest circle. - Melvin Peralta, Aug 18 2016
Does not satisfy Benford's law [Ross, 2012]. - N. J. A. Sloane, Feb 08 2017
Numerators of the solution to the generalization of the Feynman triangle problem, with an offset of 2. If each vertex of a triangle is joined to the point (1/p) along the opposite side (measured say clockwise), then the area of the inner triangle formed by these lines is equal to (p - 2)^2/(p^2 - p + 1) times the area of the original triangle, p > 2. For example, when p = 3, the ratio of the areas is 1/7. The denominators of the ratio of the areas is given by A002061. [Cook & Wood, 2004] - Joe Marasco, Feb 20 2017
Equals row sums of triangle A004737, n >= 1. - Martin Michael Musatov, Nov 07 2017
Right-hand side of the binomial coefficient identity Sum_{k = 0..n} (-1)^(n+k+1)*binomial(n,k)*binomial(n + k,k)*(n - k) = n^2. - Peter Bala, Jan 12 2022
Conjecture: For n>0, min{k such that there exist subsets A,B of {0,1,2,...,a(n)-1} such that |A|=|B|=k and A+B contains {0,1,2,...,a(n)-1}} = n. - Michael Chu, Mar 09 2022
Number of 3-permutations of n elements avoiding the patterns 132, 213, 321. See Bonichon and Sun. - Michel Marcus, Aug 20 2022
Number of intercalates in cyclic Latin squares of order 2n (cyclic Latin squares of odd order do not have intercalates). - Eduard I. Vatutin, Feb 15 2024
a(n) is the number of ternary strings of length n with at most one 0, exactly one 1, and no restriction on the number of 2's. For example, a(3)=9, consisting of the 6 permutations of the string 102 and the 3 permutations of the string 122. - Enrique Navarrete, Mar 12 2025

Examples

			For n = 8, a(8) = 8 * 15 - (1 + 3 + 5 + 7 + 9 + 11 + 13) - 7 = 8 * 15 - 49 - 7 = 64. - _Bruno Berselli_, May 04 2010
G.f. = x + 4*x^2 + 9*x^3 + 16*x^4 + 25*x^5 + 36*x^6 + 49*x^7 + 64*x^8 + 81*x^9 + ...
a(4) = 16. For n = 4 vertices, the cycle graph C4 is A-B-C-D-A. The subtrees are: 4 singles: A, B, C, D; 4 pairs: A-B, BC, C-D, A-D; 4 triples: A-B-C, B-C-D, C-D-A, D-A-B; 4 quads: A-B-C-D, B-C-D-A, C-D-A-B, D-A-B-C; 4 + 4 + 4 + 4 = 16. - _Viktar Karatchenia_, Mar 02 2016

References

  • G. L. Alexanderson et al., The William Lowell Putnam Mathematical Competition, Problems and Solutions: 1965-1984, "December 1967 Problem B4(a)", pp. 8(157) MAA Washington DC 1985.
  • T. M. Apostol, Introduction to Analytic Number Theory, Springer-Verlag, 1976, page 2.
  • Albert H. Beiler, Recreations in the theory of numbers, New York, Dover, (2nd ed.) 1966. See Chapter XV, pp. 135-167.
  • R. P. Burn & A. Chetwynd, A Cascade Of Numbers, "The prison door problem" Problem 4 pp. 5-7; 79-80 Arnold London 1996.
  • H. Cohen, A Course in Computational Algebraic Number Theory, Springer, 1996, p. 40.
  • John H. Conway and Richard K. Guy, The Book of Numbers, New York: Springer-Verlag, 1996. See pp. 31, 36, 38, 63.
  • E. Deza and M. M. Deza, Figurate numbers, World Scientific Publishing (2012), p. 6.
  • M. Gardner, Time Travel and Other Mathematical Bewilderments, Chapter 6 pp. 71-2, W. H. Freeman NY 1988.
  • Granino A. Korn and Theresa M. Korn, Mathematical Handbook for Scientists and Engineers, McGraw-Hill Book Company, New York (1968), p. 982.
  • Jan Gullberg, Mathematics from the Birth of Numbers, W. W. Norton & Co., NY & London, 1997, §8.1 Terminology and §8.6 Figurate Numbers, pp. 264, 290-291.
  • Alfred S. Posamentier, The Art of Problem Solving, Section 2.4 "The Long Cell Block" pp. 10-1; 12; 156-7 Corwin Press Thousand Oaks CA 1996.
  • Alfred S. Posamentier, Math Charmers, Tantalizing Tidbits for the Mind, Prometheus Books, NY, 2003, pages 35, 52-53, 129-132, 244.
  • Michel Rigo, Formal Languages, Automata and Numeration Systems, 2 vols., Wiley, 2014. Mentions this sequence - see "List of Sequences" in Vol. 2.
  • N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
  • J. K. Strayer, Elementary Number Theory, Exercise Set 3.3 Problems 32, 33, p. 88, PWS Publishing Co. Boston MA 1996.
  • C. W. Trigg, Mathematical Quickies, "The Lucky Prisoners" Problem 141 pp. 40, 141, Dover NY 1985.
  • R. Vakil, A Mathematical Mosaic, "The Painted Lockers" pp. 127;134 Brendan Kelly Burlington Ontario 1996.
  • David Wells, The Penguin Dictionary of Curious and Interesting Numbers. Penguin Books, NY, 1986, Revised edition 1987. See p. 123.

Links

Crossrefs

Cf. A092205, A128200, A005408, A128201, A002522, A005563, A008865, A059100, A143051, A143470, A143595, A056944, A001157 (inverse Möbius transform), A001788 (binomial transform), A228039, A001105, A004159, A159918, A173277, A095794, A162395, A186646 (Pisano periods), A028338 (2nd diagonal).
A row or column of A132191.
This sequence is related to partitions of 2^n into powers of 2, as it is shown in A002577. So A002577 connects the squares and A000447. - Valentin Bakoev, Mar 03 2009
Boustrophedon transforms: A000697, A000745.
Cf. A342819.
Cf. A013661.

Programs

Formula

G.f.: x*(1 + x) / (1 - x)^3.
E.g.f.: exp(x)*(x + x^2).
Dirichlet g.f.: zeta(s-2).
a(n) = a(-n).
Multiplicative with a(p^e) = p^(2*e). - David W. Wilson, Aug 01 2001
Sum of all matrix elements M(i, j) = 2*i/(i+j) (i, j = 1..n). a(n) = Sum_{i = 1..n} Sum_{j = 1..n} 2*i/(i + j). - Alexander Adamchuk, Oct 24 2004
a(0) = 0, a(1) = 1, a(n) = 2*a(n-1) - a(n-2) + 2. - Miklos Kristof, Mar 09 2005
From Pierre CAMI, Oct 22 2006: (Start)
a(n) is the sum of the odd numbers from 1 to 2*n - 1.
a(0) = 0, a(1) = 1, then a(n) = a(n-1) + 2*n - 1. (End)
For n > 0: a(n) = A130064(n)*A130065(n). - Reinhard Zumkeller, May 05 2007
a(n) = Sum_{k = 1..n} A002024(n, k). - Reinhard Zumkeller, Jun 24 2007
Left edge of the triangle in A132111: a(n) = A132111(n, 0). - Reinhard Zumkeller, Aug 10 2007
Binomial transform of [1, 3, 2, 0, 0, 0, ...]. - Gary W. Adamson, Nov 21 2007
a(n) = binomial(n+1, 2) + binomial(n, 2).
This sequence could be derived from the following general formula (cf. A001286, A000330): n*(n+1)*...*(n+k)*(n + (n+1) + ... + (n+k))/((k+2)!*(k+1)/2) at k = 0. Indeed, using the formula for the sum of the arithmetic progression (n + (n+1) + ... + (n+k)) = (2*n + k)*(k + 1)/2 the general formula could be rewritten as: n*(n+1)*...*(n+k)*(2*n+k)/(k+2)! so for k = 0 above general formula degenerates to n*(2*n + 0)/(0 + 2) = n^2. - Alexander R. Povolotsky, May 18 2008
From a(4) recurrence formula a(n+3) = 3*a(n+2) - 3*a(n+1) + a(n) and a(1) = 1, a(2) = 4, a(3) = 9. - Artur Jasinski, Oct 21 2008
The recurrence a(n+3) = 3*a(n+2) - 3*a(n+1) + a(n) is satisfied by all k-gonal sequences from a(3), with a(0) = 0, a(1) = 1, a(2) = k. - Jaume Oliver Lafont, Nov 18 2008
a(n) = floor(n*(n+1)*(Sum_{i = 1..n} 1/(n*(n+1)))). - Ctibor O. Zizka, Mar 07 2009
Product_{i >= 2} 1 - 2/a(i) = -sin(A063448)/A063448. - R. J. Mathar, Mar 12 2009
a(n) = A002378(n-1) + n. - Jaroslav Krizek, Jun 14 2009
a(n) = n*A005408(n-1) - (Sum_{i = 1..n-2} A005408(i)) - (n-1) = n*A005408(n-1) - a(n-1) - (n-1). - Bruno Berselli, May 04 2010
a(n) == 1 (mod n+1). - Bruno Berselli, Jun 03 2010
a(n) = a(n-1) + a(n-2) - a(n-3) + 4, n > 2. - Gary Detlefs, Sep 07 2010
a(n+1) = Integral_{x >= 0} exp(-x)/( (Pn(x)*exp(-x)*Ei(x) - Qn(x))^2 +(Pi*exp(-x)*Pn(x))^2 ), with Pn the Laguerre polynomial of order n and Qn the secondary Laguerre polynomial defined by Qn(x) = Integral_{t >= 0} (Pn(x) - Pn(t))*exp(-t)/(x-t). - Groux Roland, Dec 08 2010
Euler transform of length-2 sequence [4, -1]. - Michael Somos, Feb 12 2011
A162395(n) = -(-1)^n * a(n). - Michael Somos, Mar 19 2011
a(n) = A004201(A000217(n)); A007606(a(n)) = A000384(n); A007607(a(n)) = A001105(n). - Reinhard Zumkeller, Feb 12 2011
Sum_{n >= 1} 1/a(n)^k = (2*Pi)^k*B_k/(2*k!) = zeta(2*k) with Bernoulli numbers B_k = -1, 1/6, 1/30, 1/42, ... for k >= 0. See A019673, A195055/10 etc. [Jolley eq 319].
Sum_{n>=1} (-1)^(n+1)/a(n)^k = 2^(k-1)*Pi^k*(1-1/2^(k-1))*B_k/k! [Jolley eq 320] with B_k as above.
A007968(a(n)) = 0. - Reinhard Zumkeller, Jun 18 2011
A071974(a(n)) = n; A071975(a(n)) = 1. - Reinhard Zumkeller, Jul 10 2011
a(n) = A199332(2*n - 1, n). - Reinhard Zumkeller, Nov 23 2011
For n >= 1, a(n) = Sum_{d|n} phi(d)*psi(d), where phi is A000010 and psi is A001615. - Enrique Pérez Herrero, Feb 29 2012
a(n) = A000217(n^2) - A000217(n^2 - 1), for n > 0. - Ivan N. Ianakiev, May 30 2012
a(n) = (A000217(n) + A000326(n))/2. - Omar E. Pol, Jan 11 2013
a(n) = A162610(n, n) = A209297(n, n) for n > 0. - Reinhard Zumkeller, Jan 19 2013
a(A000217(n)) = Sum_{i = 1..n} Sum_{j = 1..n} i*j, for n > 0. - Ivan N. Ianakiev, Apr 20 2013
a(n) = A133280(A000217(n)). - Ivan N. Ianakiev, Aug 13 2013
a(2*a(n)+2*n+1) = a(2*a(n)+2*n) + a(2*n+1). - Vladimir Shevelev, Jan 24 2014
a(n+1) = Sum_{t1+2*t2+...+n*tn = n} (-1)^(n+t1+t2+...+tn)*multinomial(t1+t2 +...+tn,t1,t2,...,tn)*4^(t1)*7^(t2)*8^(t3+...+tn). - Mircea Merca, Feb 27 2014
a(n) = floor(1/(1-cos(1/n)))/2 = floor(1/(1-n*sin(1/n)))/6, n > 0. - Clark Kimberling, Oct 08 2014
a(n) = ceiling(Sum_{k >= 1} log(k)/k^(1+1/n)) = -Zeta'[1+1/n]. Thus any exponent greater than 1 applied to k yields convergence. The fractional portion declines from A073002 = 0.93754... at n = 1 and converges slowly to 0.9271841545163232... for large n. - Richard R. Forberg, Dec 24 2014
a(n) = Sum_{j = 1..n} Sum_{i = 1..n} ceiling((i + j - n + 1)/3). - Wesley Ivan Hurt, Mar 12 2015
a(n) = Product_{j = 1..n-1} 2 - 2*cos(2*j*Pi/n). - Michel Marcus, Jul 24 2015
From Ilya Gutkovskiy, Jun 21 2016: (Start)
Product_{n >= 1} (1 + 1/a(n)) = sinh(Pi)/Pi = A156648.
Sum_{n >= 0} 1/a(n!) = BesselI(0, 2) = A070910. (End)
a(n) = A028338(n, n-1), n >= 1 (second diagonal). - Wolfdieter Lang, Jul 21 2017
For n >= 1, a(n) = Sum_{d|n} sigma_2(d)*mu(n/d) = Sum_{d|n} A001157(d)*A008683(n/d). - Ridouane Oudra, Apr 15 2021
a(n) = Sum_{i = 1..2*n-1} ceiling(n - i/2). - Stefano Spezia, Apr 16 2021
From Richard L. Ollerton, May 09 2021: (Start) For n >= 1,
a(n) = Sum_{k=1..n} psi(n/gcd(n,k)).
a(n) = Sum_{k=1..n} psi(gcd(n,k))*phi(gcd(n,k))/phi(n/gcd(n,k)).
a(n) = Sum_{k=1..n} sigma_2(n/gcd(n,k))*mu(gcd(n,k))/phi(n/gcd(n,k)).
a(n) = Sum_{k=1..n} sigma_2(gcd(n,k))*mu(n/gcd(n,k))/phi(n/gcd(n,k)). (End)
a(n) = (A005449(n) + A000326(n))/3. - Klaus Purath, May 13 2021
Let T(n) = A000217(n), then a(T(n)) + a(T(n+1)) = T(a(n+1)). - Charlie Marion, Jun 27 2022
a(n) = Sum_{k=1..n} sigma_1(k) + Sum_{i=1..n} (n mod i). - Vadim Kataev, Dec 07 2022
a(n^2) + a(n^2+1) + ... + a(n^2+n) + 4*A000537(n) = a(n^2+n+1) + ... + a(n^2+2n). In general, if P(k,n) = the n-th k-gonal number, then P(2k,n^2) + P(2k,n^2+1) + ... + P(2k,n^2+n) + 4*(k-1)*A000537(n) = P(2k,n^2+n+1) + ... + P(2k,n^2+2n). - Charlie Marion, Apr 26 2024
Sum_{n>=1} 1/a(n) = A013661. - Alois P. Heinz, Oct 19 2024
a(n) = 1 + 3^3*((n-1)/(n+1))^2 + 5^3*((n-1)*(n-2)/((n+1)*(n+2)))^2 + 7^3*((n-1)*(n-2)*(n-3)/((n+1)*(n+2)*(n+3)))^2 + ... for n >= 1. - Peter Bala, Dec 09 2024

Extensions

Incorrect comment and example removed by Joerg Arndt, Mar 11 2010

A002411 Pentagonal pyramidal numbers: a(n) = n^2*(n+1)/2.

Original entry on oeis.org

0, 1, 6, 18, 40, 75, 126, 196, 288, 405, 550, 726, 936, 1183, 1470, 1800, 2176, 2601, 3078, 3610, 4200, 4851, 5566, 6348, 7200, 8125, 9126, 10206, 11368, 12615, 13950, 15376, 16896, 18513, 20230, 22050, 23976, 26011, 28158, 30420, 32800, 35301, 37926, 40678
Offset: 0

Views

Author

N. J. A. Sloane

Keywords

Comments

a(n) = n^2(n+1)/2 is half the number of colorings of three points on a line with n+1 colors. - R. H. Hardin, Feb 23 2002
Sum of n smallest multiples of n. - Amarnath Murthy, Sep 20 2002
a(n) = number of (n+6)-bit binary sequences with exactly 7 1's none of which is isolated. A 1 is isolated if its immediate neighbor(s) are 0. - David Callan, Jul 15 2004
Also as a(n) = (1/6)*(3*n^3+3*n^2), n > 0: structured trigonal prism numbers (cf. A100177 - structured prisms; A100145 for more on structured numbers). - James A. Record (james.record(AT)gmail.com), Nov 07 2004
Kekulé numbers for certain benzenoids. - Emeric Deutsch, Nov 18 2005
If Y is a 3-subset of an n-set X then, for n >= 5, a(n-4) is the number of 5-subsets of X having at least two elements in common with Y. - Milan Janjic, Nov 23 2007
a(n-1), n >= 2, is the number of ways to have n identical objects in m=2 of altogether n distinguishable boxes (n-2 boxes stay empty). - Wolfdieter Lang, Nov 13 2007
a(n+1) is the convolution of (n+1) and (3n+1). - Paul Barry, Sep 18 2008
The number of 3-character strings from an alphabet of n symbols, if a string and its reversal are considered to be the same.
Partial sums give A001296. - Jonathan Vos Post, Mar 26 2011
a(n-1):=N_1(n), n >= 1, is the number of edges of n planes in generic position in three-dimensional space. See a comment under A000125 for general arrangement. Comment to Arnold's problem 1990-11, see the Arnold reference, p.506. - Wolfdieter Lang, May 27 2011
Partial sums of pentagonal numbers A000326. - Reinhard Zumkeller, Jul 07 2012
From Ant King, Oct 23 2012: (Start)
For n > 0, the digital roots of this sequence A010888(A002411(n)) form the purely periodic 9-cycle {1,6,9,4,3,9,7,9,9}.
For n > 0, the units' digits of this sequence A010879(A002411(n)) form the purely periodic 20-cycle {1,6,8,0,5,6,6,8,5,0,6,6,3,0,0,6,1,8,0,0}.
(End)
a(n) is the number of inequivalent ways to color a path graph having 3 nodes using at most n colors. Note, here there is no restriction on the color of adjacent nodes as in the above comment by R. H. Hardin (Feb 23 2002). Also, here the structures are counted up to graph isomorphism, where as in the above comment the "three points on a line" are considered to be embedded in the plane. - Geoffrey Critzer, Mar 20 2013
After 0, row sums of the triangle in A101468. - Bruno Berselli, Feb 10 2014
Latin Square Towers: Take a Latin square of order n, with symbols from 1 to n, and replace each symbol x with a tower of height x. Then the total number of unit cubes used is a(n). - Arun Giridhar, Mar 29 2015
This is the case k = n+4 of b(n,k) = n*((k-2)*n-(k-4))/2, which is the n-th k-gonal number. Therefore, this is the 3rd upper diagonal of the array in A139600. - Luciano Ancora, Apr 11 2015
For n > 0, a(n) is the number of compositions of n+7 into n parts avoiding the part 2. - Milan Janjic, Jan 07 2016
Also the Wiener index of the n-antiprism graph. - Eric W. Weisstein, Sep 07 2017
For n > 0, a(2n+1) is the number of non-isomorphic 5C_m-snakes, where m = 2n+1 or m = 2n (for n >= 2). A kC_n-snake is a connected graph in which the k >= 2 blocks are isomorphic to the cycle C_n and the block-cutpoint graph is a path. - Christian Barrientos, May 15 2019
For n >= 1, a(n-1) is the number of 0°- and 45°-tilted squares that can be drawn by joining points in an n X n lattice. - Paolo Xausa, Apr 13 2021
a(n) is the number of all possible products of n rolls of a six-sided die. This can be easily seen by the recursive formula a(n) = a(n - 1) + 2 * binomial(n, 2) + binomial(n + 1, 2). - Rafal Walczak, Jun 15 2024
a(n) is the number of all triples consisting of nonnegative integers smaller than n such that the sum of the first two integers is less than n. - Ruediger Jehn, Aug 17 2025

Examples

			a(3)=18 because 4 identical balls can be put into m=2 of n=4 distinguishable boxes in binomial(4,2)*(2!/(1!*1!) + 2!/2!) = 6*(2+1) = 18 ways. The m=2 part partitions of 4, namely (1,3) and (2,2), specify the filling of each of the 6 possible two-box choices. - _Wolfdieter Lang_, Nov 13 2007

References

  • V. I. Arnold (ed.), Arnold's Problems, Springer, 2004, comments on Problem 1990-11 (p. 75), pp. 503-510. Numbers N_1.
  • Christian Barrientos, Graceful labelings of cyclic snakes, Ars Combin., Vol. 60 (2001), pp. 85-96.
  • Albert H. Beiler, Recreations in the Theory of Numbers, Dover, NY, 1964, p. 194.
  • S. J. Cyvin and I. Gutman, Kekulé structures in benzenoid hydrocarbons, Lecture Notes in Chemistry, No. 46, Springer, New York, 1988 (see p. 166, Table 10.4/I/5).
  • E. Deza and M. M. Deza, Figurate numbers, World Scientific Publishing (2012), page 93.
  • L. E. Dickson, History of the Theory of Numbers. Carnegie Institute Public. 256, Washington, DC, Vol. 1, 1919; Vol. 2, 1920; Vol. 3, 1923, see Vol. 2, p. 2.
  • N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

Links

Crossrefs

Cf. A001296, A011379, A015223, A015224, A014799, A014800, A127739, A132118, A139600.
A006002(n) = -a(-1-n).
a(n) = A093560(n+2, 3), (3, 1)-Pascal column.
A row or column of A132191.
Second column of triangle A103371.
Cf. similar sequences listed in A237616.

Programs

  • GAP
    List([0..45], n->n^2*(n+1)/2); # Muniru A Asiru, Feb 19 2018
  • Haskell
    a002411 n = n * a000217 n  -- Reinhard Zumkeller, Jul 07 2012
  • Magma
    [n^2*(n+1)/2: n in [0..40]]; // Wesley Ivan Hurt, May 25 2014
  • Maple
    seq(n^2*(n+1)/2, n=0..40);
  • Mathematica
    Table[n^2 (n + 1)/2, {n, 0, 40}]
LinearRecurrence[{4, -6, 4, -1}, {0, 1, 6, 18}, 50] (* Harvey P. Dale, Oct 20 2011 *)
Nest[Accumulate, Range[1, 140, 3], 2] (* Vladimir Joseph Stephan Orlovsky, Jan 21 2012 *)
CoefficientList[Series[x (1 + 2 x) / (1 - x)^4, {x, 0, 45}], x] (* Vincenzo Librandi, Jan 08 2016 *)
  • PARI
    a(n)=n^2*(n+1)/2
  • PARI
    concat(0, Vec(x*(1+2*x)/(1-x)^4 + O(x^100))) \\ Altug Alkan, Jan 07 2016

Formula

Average of n^2 and n^3.
G.f.: x*(1+2*x)/(1-x)^4. - Simon Plouffe in his 1992 dissertation
a(n) = n*Sum_{k=0..n} (n-k) = n*Sum_{k=0..n} k. - Paul Barry, Jul 21 2003
a(n) = n*A000217(n). - Xavier Acloque, Oct 27 2003
a(n) = (1/2)*Sum_{j=1..n} Sum_{i=1..n} (i+j) = (1/2)*(n^2+n^3) = (1/2)*A011379(n). - Alexander Adamchuk, Apr 13 2006
Row sums of triangle A127739, triangle A132118; and binomial transform of [1, 5, 7, 3, 0, 0, 0, ...] = (1, 6, 18, 40, 75, ...). - Gary W. Adamson, Aug 10 2007
G.f.: x*F(2,3;1;x). - Paul Barry, Sep 18 2008
Sum_{j>=1} 1/a(j) = hypergeom([1, 1, 1], [2, 3], 1) = -2 + 2*zeta(2) = A195055 - 2. - Stephen Crowley, Jun 28 2009
a(n) = 4*a(n-1) - 6*a(n-2) + 4*a(n-3) - a(n-4); a(0)=0, a(1)=1, a(2)=6, a(3)=18. - Harvey P. Dale, Oct 20 2011
From Ant King, Oct 23 2012: (Start)
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3) + 3.
a(n) = (n+1)*(2*A000326(n)+n)/6 = A000292(n) + 2*A000292(n-1).
a(n) = A000330(n)+A000292(n-1) = A000217(n) + 3*A000292(n-1).
a(n) = binomial(n+2,3) + 2*binomial(n+1,3).
(End)
a(n) = (A000330(n) + A002412(n))/2 = (A000292(n) + A002413(n))/2. - Omar E. Pol, Jan 11 2013
a(n) = (24/(n+3)!)*Sum_{j=0..n} (-1)^(n-j)*binomial(n,j)*j^(n+3). - Vladimir Kruchinin, Jun 04 2013
Sum_{n>=1} a(n)/n! = (7/2)*exp(1). - Richard R. Forberg, Jul 15 2013
E.g.f.: x*(2 + 4*x + x^2)*exp(x)/2. - Ilya Gutkovskiy, May 31 2016
From R. J. Mathar, Jul 28 2016: (Start)
a(n) = A057145(n+4,n).
a(n) = A080851(3,n-1). (End)
For n >= 1, a(n) = (Sum_{i=1..n} i^2) + Sum_{i=0..n-1} i^2*((i+n) mod 2). - Paolo Xausa, Apr 13 2021
a(n) = Sum_{k=1..n} GCD(k,n) * LCM(k,n). - Vaclav Kotesovec, May 22 2021
Sum_{n>=1} (-1)^(n+1)/a(n) = 2 + Pi^2/6 - 4*log(2). - Amiram Eldar, Jan 03 2022

A056371 Number of step shifted (decimated) sequences using a maximum of two different symbols.

Original entry on oeis.org

2, 4, 6, 12, 12, 40, 28, 96, 104, 280, 216, 1248, 704, 2800, 4344, 8928, 8232, 44224, 29204, 136032, 176752, 419872, 381492, 2150400, 1678256, 5594000, 7461168, 22553408, 19175160, 134391040, 71585136, 269510016, 429726240, 1073758360
Offset: 1

Views

Author

Marks R. Nester

Keywords

Comments

All step shifts of a sequence are considered to be equivalent, where a step shift transformation is obtained by selecting every k-th element of a sequence for some k relatively prime to n. For example, 2 is relatively prime to 5 and a 2-step shift of abcde is bdace.

References

  • M. R. Nester (1999). Mathematical investigations of some plant interaction designs. PhD Thesis. University of Queensland, Brisbane, Australia. [See A056391 for pdf file of Chap. 2]

Links

Crossrefs

Cf. A002729.
A row or column of A132191.

Programs

  • Mathematica
    a[m_, n_] := (1/EulerPhi[n])*Sum[If[GCD[k, n] == 1, m^DivisorSum[n, EulerPhi[#] / MultiplicativeOrder[k, #]&], 0], {k, n}]; Table[a[2, n], {n, 34}] (* Jean-François Alcover, Dec 04 2015 *)
  • PARI
    { a(n) = sum(k=1,n, if(gcd(k,n)==1, 2^sumdiv(n,d,eulerphi(d)/znorder(Mod(k,d))), 0); ) / eulerphi(n) } /* Max Alekseyev, Jun 18 2007 */

Formula

The cycle index is implicit in Titsworth.
a(n) = ( Sum_{k=1..n : gcd(k,n)=1} 2^( Sum_{d|n} A000010(d)/ord_d(k) ) ) / A000010(n), where ord_d(k) is the multiplicative order of k modulo d. - Max Alekseyev, Jun 18 2007, corrected Nov 08 2007

Extensions

More terms from Max Alekseyev, Jun 18 2007

A056372 Number of step shifted (decimated) sequences using a maximum of three different symbols.

Original entry on oeis.org

3, 9, 18, 54, 72, 405, 390, 1944, 3411, 14985, 17802, 139968, 133104, 798525, 1804518, 5454378, 8072532, 64599849, 64573626, 437732424, 872157294, 3138159429, 4279259574, 35362084140, 42364514403, 211822562025, 423646166250
Offset: 1

Views

Author

Marks R. Nester

Keywords

Comments

See A056371 for an explanation of step shifts.

Links

Crossrefs

Cf. A056411.
A row or column of A132191.

Programs

  • Mathematica
    a[m_, n_] := (1/EulerPhi[n])*Sum[If[GCD[k, n] == 1, m^DivisorSum[n, EulerPhi[#] / MultiplicativeOrder[k, #]&], 0], {k, 1, n}]; Table[a[3, n], {n, 1, 27}] (* Jean-François Alcover, Dec 04 2015 *)

Formula

The cycle index is implicit in Titsworth.
Sequences A056372-A056375 fit a general formula, implemented in PARI/GP as follows: { a(m,n) = sum(k=1, n, if(gcd(k, n)==1, m^sumdiv(n, d, eulerphi(d)/znorder(Mod(k, d))), 0); ) / eulerphi(n) }. - Max Alekseyev, Nov 08 2007

Extensions

More terms from Max Alekseyev, Nov 08 2007

A288620 Triangle read by rows: T(n,k) = number of step shifted (decimated) sequence structures of length n using exactly k different symbols.

Original entry on oeis.org

1, 1, 1, 1, 2, 1, 1, 5, 4, 1, 1, 5, 8, 3, 1, 1, 19, 50, 37, 9, 1, 1, 13, 54, 63, 26, 4, 1, 1, 47, 284, 479, 299, 83, 11, 1, 1, 51, 525, 1316, 1183, 454, 82, 8, 1, 1, 139, 2370, 8597, 10701, 5761, 1492, 196, 13, 1, 1, 107, 2872, 14619, 24736, 17998, 6429, 1198, 119, 6, 1
Offset: 1

Views

Author

Andrew Howroyd, Jun 11 2017

Keywords

Comments

See A056371 for an explanation of step shifts. Permuting the symbols will not change the structure.

Examples

			Triangle begins
1;
1,  1;
1,  2,   1;
1,  5,   4,    1;
1,  5,   8,    3,    1;
1, 19,  50,   37,    9,   1;
1, 13,  54,   63,   26,   4,  1;
1, 47, 284,  479,  299,  83, 11, 1;
1, 51, 525, 1316, 1183, 454, 82, 8, 1;
...

References

  • M. R. Nester (1999). Mathematical investigations of some plant interaction designs. PhD Thesis. University of Queensland, Brisbane, Australia. [See A056391 for pdf file of Chap. 2]

Links

Crossrefs

Columns 2-6 are A056396, A056397, A056398, A056399, A056400.
Row sums are A288621.
Partial row sums include A056391, A056392, A056393, A056394, A056395.
Cf. A056371, A288627, A285522, A285548, A132191.

Programs

  • PARI
    \\ see A056391 for Polya enumeration functions
T(n,k) = NonequivalentStructsExactly(StepShiftPerms(n), k); \\ Andrew Howroyd, Oct 14 2017

A288627 Triangle read by rows: T(n,k) = number of step cyclic shifted sequence structures of length n using exactly k different symbols.

Original entry on oeis.org

1, 1, 1, 1, 1, 1, 1, 3, 2, 1, 1, 2, 3, 1, 1, 1, 7, 14, 11, 3, 1, 1, 4, 11, 13, 6, 1, 1, 1, 13, 52, 83, 52, 18, 3, 1, 1, 10, 72, 162, 148, 59, 13, 2, 1, 1, 25, 274, 930, 1140, 630, 171, 28, 3, 1, 1, 14, 281, 1369, 2306, 1681, 612, 118, 14, 1, 1
Offset: 1

Views

Author

Andrew Howroyd, Jun 11 2017

Keywords

Comments

See A056371 for an explanation of step shifts. Under step cyclic shifts, abcde, bdace, bcdea, cdeab and daceb etc. are equivalent. Permuting the symbols will not change the structure.

Examples

			Triangle begins
1;
1,  1;
1,  1,   1;
1,  3,   2,   1;
1,  2,   3,   1,    1;
1,  7,  14,  11,    3,   1;
1,  4,  11,  13,    6,   1,   1;
1, 13,  52,  83,   52,  18,   3,  1;
1, 10,  72, 162,  148,  59,  13,  2, 1;
1, 25, 274, 930, 1140, 630, 171, 28, 3, 1;
...

References

  • M. R. Nester (1999). Mathematical investigations of some plant interaction designs. PhD Thesis. University of Queensland, Brisbane, Australia. [See A056391 for pdf file of Chap. 2]

Links

Crossrefs

Columns 2-6 are A056434, A056435, A056436, A056437, A056438.
Row sums are A288628.
Partial row sums include A056429, A056430, A056431, A056432, A056433.
Cf. A056391, A056371, A288620, A285522, A285548, A132191.

Programs

  • PARI
    \\ see A056391 for Polya enumeration functions
T(n,k) = NonequivalentStructsExactly(CyclicStepShiftPerms(n), k); \\ Andrew Howroyd, Oct 14 2017

A285548 Array read by antidiagonals: T(m,n) = number of step cyclic shifted sequences of length n using a maximum of m different symbols.

Original entry on oeis.org

1, 1, 2, 1, 3, 3, 1, 4, 6, 4, 1, 6, 10, 10, 5, 1, 6, 21, 20, 15, 6, 1, 13, 24, 55, 35, 21, 7, 1, 10, 92, 76, 120, 56, 28, 8, 1, 24, 78, 430, 201, 231, 84, 36, 9, 1, 22, 327, 460, 1505, 462, 406, 120, 45, 10, 1, 45, 443, 2605, 2015, 4291, 952, 666, 165, 55, 11
Offset: 1

Views

Author

Andrew Howroyd, Apr 20 2017

Keywords

Comments

See A056371, A002729 for an explanation of step shifts. Under step cyclic shifts, abcde, bdace, bcdea, cdeab and daceb etc. are equivalent.
Equivalently, the number of mappings with domain {0..n-1} and codomain {1..m} up to equivalence. Mappings A and B are equivalent if there is a d, prime to n, and a t such that A(i) = B((i*d + t) mod n) for i in {0..n-1}.
All column sequences are polynomials of order n.

Examples

			Table starts:
1  1  1   1   1     1     1      1      1       1 ...
2  3  4   6   6    13    10     24     22      45 ...
3  6 10  21  24    92    78    327    443    1632 ...
4 10 20  55  76   430   460   2605   5164   26962 ...
5 15 35 120 201  1505  2015  14070  37085  246753 ...
6 21 56 231 462  4291  6966  57561 188866 1519035 ...
7 28 84 406 952 10528 20140 192094 752087 7079800 ...
...

References

  • M. R. Nester (1999). Mathematical investigations of some plant interaction designs. PhD Thesis. University of Queensland, Brisbane, Australia. [See A056391 for pdf file of Chap. 2]

Links

Crossrefs

Rows 2-6 are A002729, A056411, A056412, A056413, A056414.
Cf. A285522, A132191.

Programs

  • Mathematica
    IsLeastPoint[s_, f_] := Module[{t=f[s]}, While[t>s, t=f[t]]; Boole[s==t]];
c[n_, k_, t_] := Sum[IsLeastPoint[u, Mod[#*k+t, n]&], {u, 0, n-1}];
a[n_, x_] := Sum[If[GCD[k, n] == 1, x^c[n, k, t], 0], {t, 0, n-1}, {k, 1,
n}] / (n*EulerPhi[n]);
Table[a[n-m+1, m], {n, 1, 11}, {m, 1, n}] // Flatten (* Jean-François Alcover, Jun 05 2017, translated from PARI *)
  • PARI
    IsLeastPoint(s,f)={my(t=f(s)); while(t>s,t=f(t));s==t}
C(n,k,t)=sum(u=0,n-1,IsLeastPoint(u,v->(v*k+t)%n));
a(n,x)=sum(t=0, n-1, sum(k=1, n, if (gcd(k, n)==1, x^C(n,k,t),0)))/(n * eulerphi(n));
for(m=1, 7, for(n=1, 10, print1( a(n,m), ", ") ); print(); );

A019582 a(n) = n*(n - 1)^3/2.

Original entry on oeis.org

0, 0, 1, 12, 54, 160, 375, 756, 1372, 2304, 3645, 5500, 7986, 11232, 15379, 20580, 27000, 34816, 44217, 55404, 68590, 84000, 101871, 122452, 146004, 172800, 203125, 237276, 275562, 318304, 365835, 418500, 476656, 540672, 610929, 687820, 771750, 863136
Offset: 0

Views

Author

N. J. A. Sloane, Dec 11 1996

Keywords

Comments

a(n) = n(n-1)^3/2 is half the number of colorings of 4 points on a line with n colors. - R. H. Hardin, Feb 23 2002
n^2*n(n+1)/2: a(n+1) = product of n-th triangular number and n-th square number. E.g., a(4)=6*9=54. - Alexandre Wajnberg, Dec 18 2005
Also, the number of ways to place two dominoes horizontally in different rows on an n X n chessboard. - Ralf Stephan, Jun 09 2014
a(n) is the second Zagreb index of the complete graph K[n]. The second Zagreb index of a simple connected graph g is the sum of the degree products d(i)d(j) over all edges ij of g. - Emeric Deutsch, Nov 07 2016
a(n+1) is the number of inequivalent 2 X 2 matrices with entries in {1,2,3,...,n} when a matrix and its transpose are considered equivalent. - David Nacin, Feb 27 2017

Examples

			G.f. = x^2 + 12*x^3 + 54*x^4 + 160*x^5 + 375*x^6 + 756*x^7 + 1372*x^8 + ...

Links

Crossrefs

Cf. A000217, A000290, A092364.
A row or column of A132191.

Programs

Formula

a(n+1) = Sum_{k=0..n} n^2(n-k) = n^3*(n+1)/2. - Paul Barry, Sep 02 2003
a(n+1) = A000290(n) * A000217(n). - Zerinvary Lajos, Jan 20 2007
Sum_{j>=2} 1/a(j) = hypergeom([1, 1, 1, 1], [2, 2, 3], 1) = 2 - 2*zeta(2) + 2*zeta(3). - Stephen Crowley, Jun 28 2009
G.f.: -x^2*(4*x^2 + 7*x + 1)/(x-1)^5. - Maksym Voznyy (voznyy(AT)mail.ru), Aug 11 2009
a(1 - n) = A092364(n). - Michael Somos, Jun 09 2014
Sum_{n>=2} (-1)^n/a(n) = 3*zeta(3)/2 - zeta(2) + 4*log(2) - 2. - Amiram Eldar, Sep 11 2022
E.g.f.: exp(x)*x^2*(1 + 3*x + x^2)/2. - Stefano Spezia, Jun 10 2023

A056375 Number of step shifted (decimated) sequences using a maximum of six different symbols.

Original entry on oeis.org

6, 36, 126, 756, 2016, 23976, 46956, 435456, 1683576, 15128856, 36284472, 547204896, 1088416056, 13060989936, 58782164616, 352913845536, 1057916846196, 16926689693376, 33853322280036, 457078896068256, 1828085963706576
Offset: 1

Views

Author

Marks R. Nester

Keywords

Comments

See A056371 for an explanation of step shifts.

References

  • M. R. Nester (1999). Mathematical investigations of some plant interaction designs. PhD Thesis. University of Queensland, Brisbane, Australia. [See A056391 for pdf file of Chap. 2]

Links

Crossrefs

Cf. A056414.
A row or column of A132191.

Programs

  • Mathematica
    a[m_, n_] := (1/EulerPhi[n])*Sum[If[GCD[k, n] == 1, m^DivisorSum[n, EulerPhi[#]/MultiplicativeOrder[k, #] &], 0], {k, 1, n}]; Table[a[6, n], {n, 1, 21}] (* Jean-François Alcover, Dec 04 2015 *)

Formula

The cycle index is implicit in Titsworth.
Sequences A056372-A056375 fit a general formula, implemented in PARI/GP as follows: { a(m,n) = sum(k=1, n, if(gcd(k, n)==1, m^sumdiv(n, d, eulerphi(d)/znorder(Mod(k, d))), 0); ) / eulerphi(n) }. - Max Alekseyev, Nov 08 2007

Extensions

More terms from Max Alekseyev, Nov 08 2007

A056373 Number of step shifted (decimated) sequences using a maximum of four different symbols.

Original entry on oeis.org

4, 16, 40, 160, 280, 2176, 2800, 17920, 44224, 263296, 419872, 4280320, 5594000, 44751616, 134391040, 539054080, 1073758360, 11453771776, 15271054960, 137575813120, 366528038400, 1759220283904, 3198580043440, 35193817661440, 56294998751872
Offset: 1

Views

Author

Marks R. Nester

Keywords

Comments

See A056371 for an explanation of step shifts.

References

  • M. R. Nester (1999). Mathematical investigations of some plant interaction designs. PhD Thesis. University of Queensland, Brisbane, Australia. [See A056391 for pdf file of Chap. 2]

Links

Crossrefs

Cf. A056412.
A row or column of A132191.

Programs

  • Mathematica
    a[m_, n_] := (1/EulerPhi[n])*Sum[If[GCD[k, n] == 1, m^DivisorSum[n, EulerPhi[#]/MultiplicativeOrder[k, #] &], 0], {k, 1, n}]; Table[a[4, n], {n, 1, 25}] (* Jean-François Alcover, Dec 04 2015 *)

Formula

The cycle index is implicit in Titsworth.
Sequences A056372-A056375 fit a general formula, implemented in PARI/GP as follows: { a(m,n) = sum(k=1, n, if(gcd(k, n)==1, m^sumdiv(n, d, eulerphi(d)/znorder(Mod(k, d))), 0); ) / eulerphi(n) }. - Max Alekseyev, Nov 08 2007

Extensions

More terms from Max Alekseyev, Nov 08 2007
Showing 1-10 of 12 results. Next

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.