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 34 results. Next

A194036 Natural interspersion of A028872, a rectangular array, by antidiagonals.

Original entry on oeis.org

1, 6, 2, 13, 7, 3, 22, 14, 8, 4, 33, 23, 15, 9, 5, 46, 34, 24, 16, 10, 11, 61, 47, 35, 25, 17, 18, 12, 78, 62, 48, 36, 26, 27, 19, 20, 97, 79, 63, 49, 37, 38, 28, 29, 21, 118, 98, 80, 64, 50, 51, 39, 40, 30, 31, 141, 119, 99, 81, 65, 66, 52, 53, 41, 42, 32, 166, 142
Offset: 1

Views

Author

Clark Kimberling, Aug 12 2011

Keywords

Comments

See A194029 for definitions of natural fractal sequence and natural interspersion. Every positive integer occurs exactly once (and every pair of rows intersperse), so that as a sequence, A194036 is a permutation of the positive integers; its inverse is A194037.

Examples

			Northwest corner:
1...6...13...22...33
2...7...14...23...34
3...8...15...24...35
4...9...16...25...36
5...10..17...26...37
11..18..27...38...51
		

Crossrefs

Programs

  • Mathematica
    z = 30;
    c[k_] := k^2 + 2 k - 2;
    c = Table[c[k], {k, 1, z}]  (* A028872 *)
    f[n_] := If[MemberQ[c, n], 1, 1 + f[n - 1]]
    f = Table[f[n], {n, 1, 255}]  (* A071797 *)
    r[n_] := Flatten[Position[f, n]]
    t[n_, k_] := r[n][[k]]
    TableForm[Table[t[n, k], {n, 1, 7}, {k, 1, 7}]]
    p = Flatten[Table[t[k, n - k + 1], {n, 1, 13}, {k, 1, n}]]  (* A194036 *)
    q[n_] := Position[p, n]; Flatten[Table[q[n], {n, 1, 70}]]  (* A194037 *)

A002522 a(n) = n^2 + 1.

Original entry on oeis.org

1, 2, 5, 10, 17, 26, 37, 50, 65, 82, 101, 122, 145, 170, 197, 226, 257, 290, 325, 362, 401, 442, 485, 530, 577, 626, 677, 730, 785, 842, 901, 962, 1025, 1090, 1157, 1226, 1297, 1370, 1445, 1522, 1601, 1682, 1765, 1850, 1937, 2026, 2117, 2210, 2305, 2402, 2501
Offset: 0

Views

Author

Keywords

Comments

An n X n nonnegative matrix A is primitive (see A070322) iff every element of A^k is > 0 for some power k. If A is primitive then the power which should have all positive entries is <= n^2 - 2n + 2 (Wielandt).
a(n) = Phi_4(n), where Phi_k is the k-th cyclotomic polynomial.
As the positive solution to x=2n+1/x is x=n+sqrt(a(n)), the continued fraction expansion of sqrt(a(n)) is {n; 2n, 2n, 2n, 2n, ...}. - Benoit Cloitre, Dec 07 2001
a(n) is one less than the arithmetic mean of its neighbors: a(n) = (a(n-1) + a(n+1))/2 - 1. E.g., 2 = (1+5)/2 - 1, 5 = (2+10)/2 - 1. - Amarnath Murthy, Jul 29 2003
Equivalently, the continued fraction expansion of sqrt(a(n)) is (n;2n,2n,2n,...). - Franz Vrabec, Jan 23 2006
Number of {12,1*2*,21}-avoiding signed permutations in the hyperoctahedral group.
The number of squares of side 1 which can be drawn without lifting the pencil, starting at one corner of an n X n grid and never visiting an edge twice is n^2-2n+2. - Sébastien Dumortier, Jun 16 2005
Also, numbers m such that m^3 - m^2 is a square, (n*(1 + n^2))^2. - Zak Seidov
1 + 2/2 + 2/5 + 2/10 + ... = Pi*coth Pi [Jolley], see A113319. - Gary W. Adamson, Dec 21 2006
For n >= 1, a(n-1) is the minimal number of choices from an n-set such that at least one particular element has been chosen at least n times or each of the n elements has been chosen at least once. Some games define "matches" this way; e.g., in the classic Parker Brothers, now Hasbro, board game Risk, a(2)=5 is the number of cards of three available types (suits) required to guarantee at least one match of three different types or of three of the same type (ignoring any jokers or wildcards). - Rick L. Shepherd, Nov 18 2007
Positive X values of solutions to the equation X^3 + (X - 1)^2 + X - 2 = Y^2. To prove that X = n^2 + 1: Y^2 = X^3 + (X - 1)^2 + X - 2 = X^3 + X^2 - X - 1 = (X - 1)(X^2 + 2X + 1) = (X - 1)*(X + 1)^2 it means: (X - 1) must be a perfect square, so X = n^2 + 1 and Y = n(n^2 + 2). - Mohamed Bouhamida, Nov 29 2007
{a(k): 0 <= k < 4} = divisors of 10. - Reinhard Zumkeller, Jun 17 2009
Appears in A054413 and A086902 in relation to sequences related to the numerators and denominators of continued fractions convergents to sqrt((2*n)^2/4 + 1), n=1, 2, 3, ... . - Johannes W. Meijer, Jun 12 2010
For n > 0, continued fraction [n,n] = n/a(n); e.g., [5,5] = 5/26. - Gary W. Adamson, Jul 15 2010
The only real solution of the form f(x) = A*x^p with negative p which satisfies f^(m)(x) = f^[-1](x), x >= 0, m >= 1, with f^(m) the m-th derivative and f^[-1] the compositional inverse of f, is obtained for m=2*n, p=p(n)= -(sqrt(a(n))-n) and A=A(n)=(fallfac(p(n),2*n))^(-p(n)/(p(n)+1)), with fallfac(x,k):=Product_{j=0..k-1} (x-j) (falling factorials). See the T. Koshy reference, pp. 263-4 (there are also two solutions for positive p, see the corresponding comment in A087475). - Wolfdieter Lang, Oct 21 2010
n + sqrt(a(n)) = [2*n;2*n,2*n,...] with the regular continued fraction with period 1. This is the even case. For the general case see A087475 with the Schroeder reference and comments. For the odd case see A078370.
a(n-1) counts configurations of non-attacking bishops on a 2 X n strip [Chaiken et al., Ann. Combin. 14 (2010) 419]. - R. J. Mathar, Jun 16 2011
Also numbers k such that 4*k-4 is a square. Hence this sequence is the union of A053755 and A069894. - Arkadiusz Wesolowski, Aug 02 2011
a(n) is also the Moore lower bound on the order, A191595(n), of an (n,5)-cage. - Jason Kimberley, Oct 17 2011
Left edge of the triangle in A195437: a(n+1) = A195437(n,0). - Reinhard Zumkeller, Nov 23 2011
If h (5,17,37,65,101,...) is prime is relatively prime to 6, then h^2-1 is divisible by 24. - Vincenzo Librandi, Apr 14 2014
The identity (4*n^2+2)^2 - (n^2+1)*(4*n)^2 = 4 can be written as A005899(n)^2 - a(n)*A008586(n)^2 = 4. - Vincenzo Librandi, Jun 15 2014
a(n) is also the number of permutations simultaneously avoiding 213 and 321 in the classical sense which can be realized as labels on an increasing strict binary tree with 2n-1 nodes. See A245904 for more information on increasing strict binary trees. - Manda Riehl, Aug 07 2014
a(n-1) is the maximum number of stages in the Gale-Shapley algorithm for finding a stable matching between two sets of n elements given an ordering of preferences for each element (see Gura et al.). - Melvin Peralta, Feb 07 2016
Because of Fermat's little theorem, a(n) is never divisible by 3. - Altug Alkan, Apr 08 2016
For n > 0, if a(n) points are placed inside an n X n square, it will always be the case that at least two of the points will be a distance of sqrt(2) units apart or less. - Melvin Peralta, Jan 21 2017
Also the limit as q->1^- of the unimodal polynomial (1-q^(n*k+1))/(1-q) after making the simplification k=n. The unimodal polynomial is from O'Hara's proof of unimodality of q-binomials after making the restriction to partitions of size <= 1. See G_1(n,k) from arXiv:1711.11252. As the size restriction s increases, G_s->G_infinity=G: the q-binomials. Then substituting k=n and q=1 yields the central binomial coefficients: A000984. - Bryan T. Ek, Apr 11 2018
a(n) is the smallest number congruent to both 1 (mod n) and 2 (mod n+1). - David James Sycamore, Apr 04 2019
a(n) is the number of permutations of 1,2,...,n+1 with exactly one reduced decomposition. - Richard Stanley, Dec 22 2022
From Klaus Purath, Apr 03 2025: (Start)
The odd prime factors of these terms are always of the form 4*k + 1.
All a(n) = D satisfy the Pell equation (k*x)^2 - D*y^2 = -1. The values for k and the solutions x, y can be calculated using the following algorithm: k = n, x(0) = 1, x(1) = 4*D - 1, y(0) = 1, y(1) = 4*D - 3. The two recurrences are of the form (4*D - 2, -1). The solutions x, y of the Pell equations for n = {1 ... 14} are in OEIS.
It follows from the above that this sequence is a subsequence of A031396. (End)

Examples

			G.f. = 1 + 2*x + 5*x^2 + 10*x^3 + 17*x^4 + 26*x^5 + 37*x^6 + 50*x^7 + 65*x^8 + ...
		

References

  • S. J. Cyvin and I. Gutman, Kekulé structures in benzenoid hydrocarbons, Lecture Notes in Chemistry, No. 46, Springer, New York, 1988 (see p. 120).
  • E. Gura and M. Maschler, Insights into Game Theory: An Alternative Mathematical Experience, Cambridge, 2008; p. 26.
  • Thomas Koshy, Fibonacci and Lucas Numbers with Applications, John Wiley and Sons, New York, 2001.

Crossrefs

Left edge of A055096.
Cf. A059100, A117950, A087475, A117951, A114949, A117619 (sequences of form n^2 + K).
a(n+1) = A101220(n, n+1, 3).
Moore lower bound on the order of a (k,g) cage: A198300 (square); rows: A000027 (k=2), A027383 (k=3), A062318 (k=4), A061547 (k=5), A198306 (k=6), A198307 (k=7), A198308 (k=8), A198309 (k=9), A198310 (k=10), A094626 (k=11); columns: A020725 (g=3), A005843 (g=4), this sequence (g=5), A051890 (g=6), A188377 (g=7). - Jason Kimberley, Oct 30 2011
Cf. A002496 (primes).
Cf. A254858.
Subsequence of A031396.

Programs

Formula

O.g.f.: (1-x+2*x^2)/((1-x)^3). - Eric Werley, Jun 27 2011
Sequences of the form a(n) = n^2 + K with offset 0 have o.g.f. (K - 2*K*x + K*x^2 + x + x^2)/(1-x)^3 and recurrence a(n) = 3*a(n-1) - 3*a(n-2) + a*(n-3). - R. J. Mathar, Apr 28 2008
For n > 0: a(n-1) = A143053(A000290(n)) - 1. - Reinhard Zumkeller, Jul 20 2008
A143053(a(n)) = A000290(n+1). - Reinhard Zumkeller, Jul 20 2008
a(n)*a(n-2) = (n-1)^4 + 4. - Reinhard Zumkeller, Feb 12 2009
a(n) = A156798(n)/A087475(n). - Reinhard Zumkeller, Feb 16 2009
From Reinhard Zumkeller, Mar 08 2010: (Start)
a(n) = A170949(A002061(n+1));
A170949(a(n)) = A132411(n+1);
A170950(a(n)) = A002061(n+1). (End)
For n > 1, a(n)^2 + (a(n) + 1)^2 + ... + (a(n) + n - 2)^2 + (a(n) + n - 1 + a(n) + n)^2 = (n+1) *(6*n^4 + 18*n^3 + 26*n^2 + 19*n + 6) / 6 = (a(n) + n)^2 + ... + (a(n) + 2*n)^2. - Charlie Marion, Jan 10 2011
From Eric Werley, Jun 27 2011: (Start)
a(n) = 2*a(n-1) - a(n-2) + 2.
a(n) = a(n-1) + 2*n - 1. (End)
a(n) = (n-1)^2 + 2(n-1) + 2 = 122 read in base n-1 (for n > 3). - Jason Kimberley, Oct 20 2011
a(n)*a(n+1) = a(n*(n+1) + 1) so a(1)*a(2) = a(3). More generally, a(n)*a(n+k) = a(n*(n+k) + 1) + k^2 - 1. - Jon Perry, Aug 01 2012
a(n) = (n!)^2* [x^n] BesselI(0, 2*sqrt(x))*(1+x). - Peter Luschny, Aug 25 2012
a(n) = A070216(n,1) for n > 0. - Reinhard Zumkeller, Nov 11 2012
E.g.f.: exp(x)*(1 + x + x^2). - Geoffrey Critzer, Aug 30 2013
a(n) = A254858(n-2,3) for n > 2. - Reinhard Zumkeller, Feb 09 2015
Sum_{n>=0} (-1)^n / a(n) = (1+Pi/sinh(Pi))/2 = 0.636014527491... = A367976 . - Vaclav Kotesovec, Feb 14 2015
Sum_{n>=0} 1/a(n) = (1 + Pi*coth(Pi))/2 = 2.076674... = A113319. - Vaclav Kotesovec, Apr 10 2016
4*a(n) = A001105(n-1) + A001105(n+1). - Bruno Berselli, Jul 03 2017
From Amiram Eldar, Jan 20 2021: (Start)
Product_{n>=0} (1 + 1/a(n)) = sqrt(2)*csch(Pi)*sinh(sqrt(2)*Pi).
Product_{n>=1} (1 - 1/a(n)) = Pi*csch(Pi). (End)
Sum_{n>=0} a(n)/n! = 3*e. - Davide Rotondo, Feb 16 2025

Extensions

Partially edited by Joerg Arndt, Mar 11 2010

A001835 a(n) = 4*a(n-1) - a(n-2), with a(0) = 1, a(1) = 1.

Original entry on oeis.org

1, 1, 3, 11, 41, 153, 571, 2131, 7953, 29681, 110771, 413403, 1542841, 5757961, 21489003, 80198051, 299303201, 1117014753, 4168755811, 15558008491, 58063278153, 216695104121, 808717138331, 3018173449203, 11263976658481, 42037733184721, 156886956080403, 585510091136891
Offset: 0

Views

Author

Keywords

Comments

See A079935 for another version.
Number of ways of packing a 3 X 2*(n-1) rectangle with dominoes. - David Singmaster.
Equivalently, number of perfect matchings of the P_3 X P_{2(n-1)} lattice graph. - Emeric Deutsch, Dec 28 2004
The terms of this sequence are the positive square roots of the indices of the octagonal numbers (A046184) - Nicholas S. Horne (nairon(AT)loa.com), Dec 13 1999
Terms are the solutions to: 3*x^2 - 2 is a square. - Benoit Cloitre, Apr 07 2002
Gives solutions x > 0 of the equation floor(x*r*floor(x/r)) == floor(x/r*floor(x*r)) where r = 1 + sqrt(3). - Benoit Cloitre, Feb 19 2004
a(n) = L(n-1,4), where L is defined as in A108299; see also A001834 for L(n,-4). - Reinhard Zumkeller, Jun 01 2005
Values x + y, where (x, y) solves for x^2 - 3*y^2 = 1, i.e., a(n) = A001075(n) + A001353(n). - Lekraj Beedassy, Jul 21 2006
Number of 01-avoiding words of length n on alphabet {0,1,2,3} which do not end in 0. (E.g., for n = 2 we have 02, 03, 11, 12, 13, 21, 22, 23, 31, 32, 33.) - Tanya Khovanova, Jan 10 2007
sqrt(3) = 2/2 + 2/3 + 2/(3*11) + 2/(11*41) + 2/(41*153) + 2/(153*571) + ... - Gary W. Adamson, Dec 18 2007
The lower principal convergents to 3^(1/2), beginning with 1/1, 5/3, 19/11, 71/41, comprise a strictly increasing sequence; numerators = A001834, denominators = A001835. - Clark Kimberling, Aug 27 2008
From Gary W. Adamson, Jun 21 2009: (Start)
A001835 and A001353 = bisection of denominators of continued fraction [1, 2, 1, 2, 1, 2, ...]; i.e., bisection of A002530.
a(n) = determinant of an n*n tridiagonal matrix with 1's in the super- and subdiagonals and (3, 4, 4, 4, ...) as the main diagonal.
Also, the product of the eigenvalues of such matrices: a(n) = Product_{k=1..(n-1)/2)} (4 + 2*cos(2*k*Pi/n).
(End)
Let M = a triangle with the even-indexed Fibonacci numbers (1, 3, 8, 21, ...) in every column, and the leftmost column shifted up one row. a(n) starting (1, 3, 11, ...) = lim_{n->oo} M^n, the left-shifted vector considered as a sequence. - Gary W. Adamson, Jul 27 2010
a(n+1) is the number of compositions of n when there are 3 types of 1 and 2 types of other natural numbers. - Milan Janjic, Aug 13 2010
For n >= 2, a(n) equals the permanent of the (2*n-2) X (2*n-2) tridiagonal matrix with sqrt(2)'s along the main diagonal, and 1's along the superdiagonal and the subdiagonal. - John M. Campbell, Jul 08 2011
Primes in the sequence are apparently those in A096147. - R. J. Mathar, May 09 2013
Except for the first term, positive values of x (or y) satisfying x^2 - 4xy + y^2 + 2 = 0. - Colin Barker, Feb 04 2014
Except for the first term, positive values of x (or y) satisfying x^2 - 14xy + y^2 + 32 = 0. - Colin Barker, Feb 10 2014
The (1,1) element of A^n where A = (1, 1, 1; 1, 2, 1; 1, 1, 2). - David Neil McGrath, Jul 23 2014
Yong Hao Ng has shown that for any n, a(n) is coprime with any member of A001834 and with any member of A001075. - René Gy, Feb 25 2018
a(n+1) is the number of spanning trees of the graph T_n, where T_n is a 2 X n grid with an additional vertex v adjacent to (1,1) and (2,1). - Kevin Long, May 04 2018
a(n)/A001353(n) is the resistance of an n-ladder graph whose edges are replaced by one-ohm resistors. The resistance in ohms is measured at two nodes at one end of the ladder. It approaches sqrt(3) - 1 for n -> oo. See A342568, A357113, and A357115 for related information. - Hugo Pfoertner, Sep 17 2022
a(n) is the number of ways to tile a 1 X (n-1) strip with three types of tiles: small isosceles right triangles (with small side length 1), 1 X 1 squares formed by joining two of those right triangles along the hypotenuse, and large isosceles right triangles (with large side length 2) formed by joining two of those right triangles along a short leg. As an example, here is one of the a(6)=571 ways to tile a 1 X 5 strip with these kinds of tiles:
| / \ |\ /| |
|/_\|\/_||. - Greg Dresden and Arjun Datta, Jun 30 2023
From Klaus Purath, May 11 2024: (Start)
For any two consecutive terms (a(n), a(n+1)) = (x,y): x^2 - 4xy + y^2 = -2 = A028872(-1). In general, the following applies to all sequences (t) satisfying t(i) = 4t(i-1) - t(i-2) with t(0) = 1 and two consecutive terms (x,y): x^2 - 4xy + y^2 = A028872(t(1)-2). This includes and interprets the Feb 04 2014 comments here and on A001075 by Colin Barker and the Dec 12 2012 comment on A001353 by Max Alekseyev. By analogy to this, for three consecutive terms (x,y,z) y^2 - xz = A028872(t(1)-2). This includes and interprets the Jul 10 2021 comment on A001353 by Bernd Mulansky.
If (t) is a sequence satisfying t(k) = 3t(k-1) + 3t(k-2) - t(k-3) or t(k) = 4t(k-1) - t(k-2) without regard to initial values and including this sequence itself, then a(n) = (t(k+2n+1) + t(k))/(t(k+n+1) + t(k+n)) always applies, as long as t(k+n+1) + t(k+n) != 0 for integer k and n >= 1. (End)
Binomial transform of 1, 0, 2, 4, 12, ... (A028860 without the initial -1) and reverse binomial transform of 1, 2, 6, 24, 108, ... (A094433 without the initial 1). - Klaus Purath, Sep 09 2024

References

  • Julio R. Bastida, Quadratic properties of a linearly recurrent sequence. Proceedings of the Tenth Southeastern Conference on Combinatorics, Graph Theory and Computing (Florida Atlantic Univ., Boca Raton, Fla., 1979), pp. 163-166, Congress. Numer., XXIII-XXIV, Utilitas Math., Winnipeg, Man., 1979. MR0561042 (81e:10009).
  • Leonhard Euler, (E388) Vollstaendige Anleitung zur Algebra, Zweiter Theil, reprinted in: Opera Omnia. Teubner, Leipzig, 1911, Series (1), Vol. 1, p. 375.
  • F. Faase, On the number of specific spanning subgraphs of the graphs G X P_n, Ars Combin. 49 (1998), 129-154.
  • R. L. Graham, D. E. Knuth and O. Patashnik, Concrete Mathematics. Addison-Wesley, Reading, MA, 1990, p. 329.
  • Serge Lang, Introduction to Diophantine Approximations, Addison-Wesley, New York, 1966.
  • 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).
  • R. P. Stanley, Enumerative Combinatorics I, p. 292.

Crossrefs

Row 3 of array A099390.
Essentially the same as A079935.
First differences of A001353.
Partial sums of A052530.
Pairwise sums of A006253.
Bisection of A002530, A005246 and A048788.
First column of array A103997.
Cf. A001519, A003699, A082841, A101265, A125077, A001353, A001542, A096147 (subsequence of primes).

Programs

  • GAP
    a:=[1,1];; for n in [3..20] do a[n]:=4*a[n-1]-a[n-2]; od; a; # G. C. Greubel, Dec 23 2019
  • Haskell
    a001835 n = a001835_list !! n
    a001835_list =
       1 : 1 : zipWith (-) (map (4 *) $ tail a001835_list) a001835_list
    -- Reinhard Zumkeller, Aug 14 2011
    
  • Magma
    [n le 2 select 1 else 4*Self(n-1)-Self(n-2): n in [1..25]]; // Vincenzo Librandi, Sep 16 2016
    
  • Maple
    f:=n->((3+sqrt(3))^(2*n-1)+(3-sqrt(3))^(2*n-1))/6^n; [seq(simplify(expand(f(n))),n=0..20)]; # N. J. A. Sloane, Nov 10 2009
  • Mathematica
    CoefficientList[Series[(1-3x)/(1-4x+x^2), {x, 0, 24}], x] (* Jean-François Alcover, Jul 25 2011, after g.f. *)
    LinearRecurrence[{4,-1},{1,1},30] (* Harvey P. Dale, Jun 08 2013 *)
    Table[Round@Fibonacci[2n-1, Sqrt[2]], {n, 0, 20}] (* Vladimir Reshetnikov, Sep 15 2016 *)
    Table[(3*ChebyshevT[n, 2] - ChebyshevU[n, 2])/2, {n, 0, 20}] (* G. C. Greubel, Dec 23 2019 *)
  • PARI
    {a(n) = real( (2 + quadgen(12))^n * (1 - 1 / quadgen(12)) )} /* Michael Somos, Sep 19 2008 */
    
  • PARI
    {a(n) = subst( (polchebyshev(n) + polchebyshev(n-1)) / 3, x, 2)} /* Michael Somos, Sep 19 2008 */
    
  • Sage
    [lucas_number1(n,4,1)-lucas_number1(n-1,4,1) for n in range(25)] # Zerinvary Lajos, Apr 29 2009
    
  • Sage
    [(3*chebyshev_T(n,2) - chebyshev_U(n,2))/2 for n in (0..20)] # G. C. Greubel, Dec 23 2019
    

Formula

G.f.: (1 - 3*x)/(1 - 4*x + x^2). - Simon Plouffe in his 1992 dissertation
a(1-n) = a(n).
a(n) = ((3 + sqrt(3))^(2*n - 1) + (3 - sqrt(3))^(2*n - 1))/6^n. - Dean Hickerson, Dec 01 2002
a(n) = (8 + a(n-1)*a(n-2))/a(n-3). - Michael Somos, Aug 01 2001
a(n+1) = Sum_{k=0..n} 2^k * binomial(n + k, n - k), n >= 0. - Len Smiley, Dec 09 2001
Limit_{n->oo} a(n)/a(n-1) = 2 + sqrt(3). - Gregory V. Richardson, Oct 10 2002
a(n) = 2*A061278(n-1) + 1 for n > 0. - Bruce Corrigan (scentman(AT)myfamily.com), Nov 04 2002
Let q(n, x) = Sum_{i=0..n} x^(n-i)*binomial(2*n - i, i); then q(n, 2) = a(n+1). - Benoit Cloitre, Nov 10 2002
a(n+1) = Sum_{k=0..n} ((-1)^k)*((2*n+1)/(2*n + 1 - k))*binomial(2*n + 1 - k, k)*6^(n - k) (from standard T(n,x)/x, n >= 1, Chebyshev sum formula). The Smiley and Cloitre sum representation is that of the S(2*n, i*sqrt(2))*(-1)^n Chebyshev polynomial. - Wolfdieter Lang, Nov 29 2002
a(n) = S(n-1, 4) - S(n-2, 4) = T(2*n-1, sqrt(3/2))/sqrt(3/2) = S(2*(n-1), i*sqrt(2))*(-1)^(n - 1), with S(n, x) := U(n, x/2), resp. T(n, x), Chebyshev's polynomials of the second, resp. first, kind. See A049310 and A053120. S(-1, x) = 0, S(-2, x) = -1, S(n, 4) = A001353(n+1), T(-1, x) = x.
a(n+1) = sqrt((A001834(n)^2 + 2)/3), n >= 0 (see Cloitre comment).
Sequence satisfies -2 = f(a(n), a(n+1)) where f(u, v) = u^2 + v^2 - 4*u*v. - Michael Somos, Sep 19 2008
a(n) = (1/6)*(3*(2 - sqrt(3))^n + sqrt(3)*(2 - sqrt(3))^n + 3*(2 + sqrt(3))^n - sqrt(3)*(2 + sqrt(3))^n) (Mathematica's solution to the recurrence relation). - Sarah-Marie Belcastro, Jul 04 2009
If p[1] = 3, p[i] = 2, (i > 1), and if A is Hessenberg matrix of order n defined by: A[i,j] = p[j-i+1], (i <= j), A[i,j] = -1, (i = j+1), and A[i,j] = 0 otherwise. Then, for n >= 1, a(n+1) = det A. - Milan Janjic, Apr 29 2010
a(n) = (a(n-1)^2 + 2)/a(n-2). - Irene Sermon, Oct 28 2013
a(n) = A001353(n+1) - 3*A001353(n). - R. J. Mathar, Oct 30 2015
a(n) = a(n-1) + 2*A001353(n-1). - Kevin Long, May 04 2018
From Franck Maminirina Ramaharo, Nov 11 2018: (Start)
a(n) = (-1)^n*(A125905(n) + 3*A125905(n-1)), n > 0.
E.g.f.: exp^(2*x)*(3*cosh(sqrt(3)*x) - sqrt(3)*sinh(sqrt(3)*x))/3. (End)
From Peter Bala, Feb 12 2024: (Start)
For n in Z, a(n) = A001353(n) + A001353(1-n).
For n, j, k in Z, a(n)*a(n+j+k) - a(n+j)*a(n+k) = 2*A001353(j)*A001353(k). The case j = 1, k = 2 is given above. (End)

A194029 Natural fractal sequence of the Fibonacci sequence (1, 2, 3, 5, 8, ...).

Original entry on oeis.org

1, 1, 1, 2, 1, 2, 3, 1, 2, 3, 4, 5, 1, 2, 3, 4, 5, 6, 7, 8, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34
Offset: 1

Views

Author

Clark Kimberling, Aug 12 2011

Keywords

Comments

Suppose that c(1), c(2), c(3), ... is an increasing sequence of positive integers with c(1) = 1, and that the sequence c(k+1) - c(k) is strictly increasing. The natural fractal sequence f of c is defined by:
If c(k) <= n < c(k+1), then f(n) = 1 + n - c(k).
This defines the present sequence a(n) = f(n) for c = A000045.
The natural interspersion of c is here introduced as the array given by T(n,k) =(position of k-th n in f). Note that c = (row 1 of T).
As a different example from the one considered here (c = A000045), let c = A000217 = (1, 3, 6, 10, 15, ...), the triangular numbers, so that f = (1, 2, 1, 2, 3, 1, 2, 3, 4, 1, 2, 3, 4, 5, ...) = A002260, and a northwest corner of T = A194029 is:
1 3 6 10 15 ...
2 4 7 11 16 ...
5 8 12 17 23 ...
9 13 18 24 31 ...
...
Since every number in the set N of positive integers occurs exactly once in this (and every) interspersion, a listing of the terms of T by antidiagonals comprises a permutation, p, of N; letting q denote the inverse of p, we thus have for each c a fractal sequence, an interspersion T, and two permutations of N:
c f T / p q
It appears that this is also a triangle read by rows in which row n lists the first A000045(n) positive integers, n >= 1 (see example). - Omar E. Pol, May 28 2012
This is true, because the sequence c = A000045 has the property that c(k+1) - c(k) = c(k-1), so the number of integers {1, 2, 3, ...} to be filled in from index n = c(k) to n = c(k+1)-1 is equal to c(k-1); see also the first EXAMPLE. - M. F. Hasler, Apr 23 2022

Examples

			The sequence (1, 2, 3, 5, 8, 13, ...) is used to place '1's in positions numbered 1, 2, 3, 5, 8, 13, ...  Then gaps are filled in with consecutive counting numbers:
  1, 1, 1, 2, 1, 2, 3, 1, 2, 3, 4, 5, 1, ...
From _Omar E. Pol_, May 28 2012: (Start)
Written as an irregular triangle the sequence begins:
  1;
  1;
  1, 2;
  1, 2, 3;
  1, 2, 3, 4, 5;
  1, 2, 3, 4, 5, 6, 7, 8;
  1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13;
  1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21; ...
The row lengths are A000045(n).
(End)
		

References

  • Clark Kimberling, "Fractal sequences and interspersions," Ars Combinatoria 45 (1997) 157-168.

Crossrefs

Cf. A000045 (Fibonacci numbers).
Cf. A066628, A194030, A194031 (natural interspersion of A000045 and inverse permutation).
Cf. A130853.

Programs

  • Maple
    T:= n-> $1..(<<0|1>, <1|1>>^n)[1, 2]:
    seq(T(n), n=1..10);  # Alois P. Heinz, Dec 11 2024
  • Mathematica
    z = 40;
    c[k_] := Fibonacci[k + 1];
    c = Table[c[k], {k, 1, z}]  (* A000045 *)
    f[n_] := If[MemberQ[c, n], 1, 1 + f[n - 1]]
    f = Table[f[n], {n, 1, 800}]  (* A194029 *)
    r[n_] := Flatten[Position[f, n]]
    t[n_, k_] := r[n][[k]]
    TableForm[Table[t[n, k], {n, 1, 8}, {k, 1, 7}]]
    p = Flatten[Table[t[k, n - k + 1], {n, 1, 13}, {k, 1, n}]]  (* A194030 *)
    q[n_] := Position[p, n]; Flatten[Table[q[n], {n, 1, 80}]]  (* A194031 *)
    Flatten[Range[Fibonacci[Range[66]]]] (* Birkas Gyorgy, Jun 30 2012 *)

Formula

a(n) = A066628(n)+1. - Alan Michael Gómez Calderón, Oct 30 2023

Extensions

Edited by M. F. Hasler, Apr 23 2022

A152811 a(n) = 2*(n^2 + 2*n - 2).

Original entry on oeis.org

2, 12, 26, 44, 66, 92, 122, 156, 194, 236, 282, 332, 386, 444, 506, 572, 642, 716, 794, 876, 962, 1052, 1146, 1244, 1346, 1452, 1562, 1676, 1794, 1916, 2042, 2172, 2306, 2444, 2586, 2732, 2882, 3036, 3194, 3356, 3522, 3692, 3866, 4044, 4226, 4412, 4602, 4796, 4994
Offset: 1

Views

Author

Vincenzo Librandi, Dec 17 2008

Keywords

Comments

Positive numbers k such that 2*k + 12 is a square. [Comment simplified by Zak Seidov, Jan 14 2009]
Sequence gives positive x values of solutions (x,y) to the Diophantine equation 2*x^3 + 12*x^2 = y^2. Corresponding y values are 8*A154560. There are three other solutions: (0,0), (-4,8) and (-6,0).
From a(2) onwards, third subdiagonal of triangle defined in A144562.
Also, nonnegative numbers of the form (m+sqrt(-3))^2 + (m-sqrt(-3))^2. - Bruno Berselli, Mar 13 2015
a(n-1) is the maximum Zagreb index over all maximal 2-degenerate graphs with n vertices. The extremal graphs are 2-stars, so the bound also applies to 2-trees. (The Zagreb index of a graph is the sum of the squares of the degrees over all vertices of the graph.) - Allan Bickle, Apr 11 2024

Examples

			a(4) = 2*(4^2 + 2*4 - 2) = 44 = 2*22 = 2*A028872(5); 2*44^3 + 12*44^2 = 193600 = 440^2 is a square.
The graph K_3 has 3 degree 2 vertices, so a(3-1) = 3*4 = 12.
		

Crossrefs

Cf. A028872 (n^2-3), A154560 ((n+3)^2*n/2+1), A144562 (triangle T(m,n) = 2m*n+m+n-1).
Cf. A002378, A152811, A371912 (Zagreb indices of maximal k-degenerate graphs).

Programs

  • Magma
    [ 2*(n^2+2*n-2) : n in [1..47] ];
    
  • Mathematica
    Table[2*n*(n + 2) - 4, {n, 50}] (* Paolo Xausa, Aug 08 2024 *)
  • PARI
    {m=4700; for(n=1, m, if(issquare(2*n^3+12*n^2), print1(n, ",")))}

Formula

G.f.: 2*x*(1 + 3*x - 2*x^2)/(1-x)^3. [corrected by Elmo R. Oliveira, Nov 17 2024]
a(n) = 2*A028872(n+1).
a(n) = a(n-1) + 4*n + 2 for n > 1, a(1)=2.
From Amiram Eldar, Mar 02 2023: (Start)
Sum_{n>=1} 1/a(n) = 1/3 - cot(sqrt(3)*Pi)*Pi/(4*sqrt(3)).
Sum_{n>=1} (-1)^(n+1)/a(n) = -(2 + sqrt(3)*Pi*cosec(sqrt(3)*Pi))/12. (End)
From Elmo R. Oliveira, Nov 17 2024: (Start)
E.g.f.: 2*(exp(x)*(x^2 + 3*x - 2) + 2).
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3) for n > 3. (End)

Extensions

Edited and extended by Klaus Brockhaus, Jan 12 2009

A082111 a(n) = n^2 + 5*n + 1.

Original entry on oeis.org

1, 7, 15, 25, 37, 51, 67, 85, 105, 127, 151, 177, 205, 235, 267, 301, 337, 375, 415, 457, 501, 547, 595, 645, 697, 751, 807, 865, 925, 987, 1051, 1117, 1185, 1255, 1327, 1401, 1477, 1555, 1635, 1717, 1801, 1887, 1975, 2065, 2157, 2251, 2347, 2445, 2545, 2647
Offset: 0

Views

Author

Paul Barry, Apr 04 2003

Keywords

Comments

From Gary W. Adamson, Jul 29 2009: (Start)
Let (a,b) = roots to x^2 - 5*x + 1 = 0 = 4.79128... and 0.208712...
Then a(n) = (n + a) * (n + b). Example: a(5) = 51 = (5 + 4.79128...) * (5 + 0.208712...) (End)
For n > 0: a(n) = A176271(n+2,n). - Reinhard Zumkeller, Apr 13 2010
a(n-2) = n*(n+1) - 5, n >= 0, with a(-2) = -5 and a(-1) = -3, gives the values for a*c of indefinite binary quadratic forms [a, b, c] of discriminant D = 21 for b = 2*n + 1. In general D = b^2 - 4*a*c > 0 and the form [a, b, c] is a*x^2 + b*x*y + c*y^2. - Wolfdieter Lang, Aug 15 2013
Numbers m > 0 such that 4m+21 is a square. - Bruce J. Nicholson, Jul 19 2017
Numbers represented as 151 in number base B. If 'digits' from B upwards are allowed then 151(2)=15, 151(3)=25, 151(4)=37, 151(5)=51 also. - Ron Knott, Nov 14 2017
If A and B are sequences satisfying the recurrence t(n) = 5*t(n-1) - t(n-2) with initial values A(0) = 1, A(1) = n+5 and B(0) = -1, B(1) = n, then a(n) = A(i)^2 - A(i-1)*A(i+1) = B(j)^2 - B(j-1)*B(j+1) for i, j > 0. - Klaus Purath, Oct 18 2020
The prime terms in this sequence are listed in A089376. The prime factors are given in A038893. With the exception of 3 and 7, each prime factor p divides exactly 2 out of any p consecutive terms. If a(i) and a(k) form such a pair that are divisible by p, then i + k == -5 (mod p). - Klaus Purath, Nov 24 2020

Crossrefs

First row of A082110.

Programs

Formula

a(n) = 2*n + a(n-1) + 4 (with a(0)=1). - Vincenzo Librandi, Aug 08 2010
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3); a(0)=1, a(1)=7, a(2)=15. - Harvey P. Dale, Apr 22 2012
Sum_{n>=0} 1/a(n) = 8/15 + Pi*tan(sqrt(21)*Pi/2)/sqrt(21) = 1.424563592286456286... . - Vaclav Kotesovec, Apr 10 2016
From G. C. Greubel, Jul 19 2017: (Start)
G.f.: (1 + 4*x - 3*x^2)/(1 - x)^3.
E.g.f.: (x^2 + 6*x + 1)*exp(x). (End)
a(n) = A014209(n+1) - 2 = A338041(2*n+1). - Hugo Pfoertner, Oct 08 2020
a(n) = A249547(n+1) - A024206(n-4), n >= 5. - Klaus Purath, Nov 24 2020

Extensions

New title (using given formula) from Hugo Pfoertner, Oct 08 2020

A144303 Square array A(n,m), n>=0, m>=0, read by antidiagonals: A(n,m) = n-th number of the m-th iteration of the hyperbinomial transform on the sequence of 1's.

Original entry on oeis.org

1, 1, 1, 1, 2, 1, 1, 3, 6, 1, 1, 4, 13, 29, 1, 1, 5, 22, 81, 212, 1, 1, 6, 33, 163, 689, 2117, 1, 1, 7, 46, 281, 1564, 7553, 26830, 1, 1, 8, 61, 441, 2993, 18679, 101961, 412015, 1, 1, 9, 78, 649, 5156, 38705, 268714, 1639529, 7433032, 1, 1, 10, 97, 911, 8257, 71801, 592489, 4538209, 30640257, 154076201, 1
Offset: 0

Views

Author

Alois P. Heinz, Sep 17 2008, revised Oct 30 2012

Keywords

Comments

See A088956 for the definition of the hyperbinomial transform.
A(n,m), n>=0, m>=0, is the number of subtrees of the complete graph K_{n+m} on n+m vertices containing a given, fixed subtree on m vertices. - Alex Chin, Jul 25 2013

Examples

			Square array begins:
  1,     1,      1,      1,      1,       1,       1, ...
  1,     2,      3,      4,      5,       6,       7, ...
  1,     6,     13,     22,     33,      46,      61, ...
  1,    29,     81,    163,    281,     441,     649, ...
  1,   212,    689,   1564,   2993,    5156,    8257, ...
  1,  2117,   7553,  18679,  38705,   71801,  123217, ...
  1, 26830, 101961, 268714, 592489, 1166886, 2120545, ...
		

Crossrefs

Rows n=0-2 give: A000012, A000027, A028872.
Main diagonal gives A252766.

Programs

  • Maple
    hymtr:= proc(p) proc(n,m) `if`(m=0, p(n), m*add(
               p(k)*binomial(n, k) *(n-k+m)^(n-k-1), k=0..n))
            end end:
    A:= hymtr(1):
    seq(seq(A(n, d-n), n=0..d), d=0..12);
  • Mathematica
    a[, 0] = 1; a[n, k_] := Sum[k*(n - j + k)^(n - j - 1)*Binomial[n, j], {j, 0, n}]; Table[a[n - k, k], {n, 0, 10}, {k, n, 0, -1}] // Flatten (* Jean-François Alcover, Jun 24 2013 *)

Formula

E.g.f. of column k: exp(x) * (-LambertW(-x)/x)^k.
A(n,k) = Sum_{j=0..n} k * (n-j+k)^(n-j-1) * C(n,j).

A121670 a(n) = n^3 - 3*n.

Original entry on oeis.org

0, -2, 2, 18, 52, 110, 198, 322, 488, 702, 970, 1298, 1692, 2158, 2702, 3330, 4048, 4862, 5778, 6802, 7940, 9198, 10582, 12098, 13752, 15550, 17498, 19602, 21868, 24302, 26910, 29698, 32672, 35838, 39202, 42770, 46548, 50542, 54758, 59202, 63880, 68798, 73962
Offset: 0

Views

Author

Gary W. Adamson, Aug 14 2006

Keywords

Comments

Previous name was: Real part of (n + i)^3, companion to A080663.
Reversing the order of terms in (n + i)^3 to (1 + ni)^3 generates the terms of A080663. E.g, A080663(4) = 47 since (1 + 4i)^3 = (-47 - 52i). Or, (n + i)^3 = (a(n) + A080663(a)i) and (1 + ni)^3 = (-A080663(n) - a(n)i).
Also, numbers n such that the polynomial x^6 - n*x^3 + 1 is reducible. - Ralf Stephan, Oct 24 2013

Examples

			a(4) = 52 since (4 + i)^3 = (52 + 47i); where 47 = A080663(4).
		

Crossrefs

Programs

  • Mathematica
    CoefficientList[Series[-2 x (x^2 - 5 x + 1)/(x - 1)^4, {x, 0, 40}], x] (* Vincenzo Librandi, Jun 11 2014 *)
    Table[n^3-3n,{n,0,60}] (* or *) LinearRecurrence[{4,-6,4,-1},{0,-2,2,18},60] (* Harvey P. Dale, Nov 30 2021 *)
  • PARI
    Vec(-2*x*(x^2-5*x+1)/(x-1)^4 + O(x^100)); \\ Colin Barker, Oct 16 2013

Formula

a(n) = Re( (n + i)^3 ).
a(n) = n^3-3*n. a(n) = 4*a(n-1)-6*a(n-2)+4*a(n-3)-a(n-4). G.f.: -2*x*(x^2-5*x+1) / (x-1)^4. - Colin Barker, Oct 16 2013
a(n)^2 = A028872(n)^3 + 3*A028872(n)^2 for n>1. - Bruno Berselli, May 03 2018
a(n) = A058794(n-2) for n>1. - Altug Alkan, May 03 2018

Extensions

Terms corrected, new name, and more terms from Colin Barker, Oct 16 2013

A082105 Array A(n, k) = (k*n)^2 + 4*(k*n) + 1, read by antidiagonals.

Original entry on oeis.org

1, 1, 1, 1, 6, 1, 1, 13, 13, 1, 1, 22, 33, 22, 1, 1, 33, 61, 61, 33, 1, 1, 46, 97, 118, 97, 46, 1, 1, 61, 141, 193, 193, 141, 61, 1, 1, 78, 193, 286, 321, 286, 193, 78, 1, 1, 97, 253, 397, 481, 481, 397, 253, 97, 1, 1, 118, 321, 526, 673, 726, 673, 526, 321, 118, 1
Offset: 0

Views

Author

Paul Barry, Apr 03 2003

Keywords

Examples

			Array, A(n, k), begins as:
  1,  1,   1,   1,   1,   1, ... A000012;
  1,  6,  13,  22,  33,  46, ... A028872;
  1, 13,  33,  61,  97, 141, ... A082109;
  1, 22,  61, 118, 193, 286, ... ;
  1, 33,  97, 193, 321, 481, ... ;
  1, 46, 141, 286, 481, 726, ... ;
Triangle, T(n, k), begins as:
  1;
  1,  1;
  1,  6,   1;
  1, 13,  13,   1;
  1, 22,  33,  22,   1;
  1, 33,  61,  61,  33,   1;
  1, 46,  97, 118,  97,  46,   1;
  1, 61, 141, 193, 193, 141,  61,  1;
  1, 78, 193, 286, 321, 286, 193, 78,  1;
		

Crossrefs

Programs

  • Magma
    [(k*(n-k))^2 + 4*(k*(n-k)) + 1: k in [0..n], n in [0..13]]; // G. C. Greubel, Dec 22 2022
    
  • Mathematica
    T[n_, k_]:= (k*(n-k))^2 + 4*(k*(n-k)) + 1;
    Table[T[n,k], {n,0,13}, {k,0,n}]//Flatten (* G. C. Greubel, Dec 22 2022 *)
  • SageMath
    def A082105(n,k): return (k*(n-k))^2 + 4*(k*(n-k)) + 1
    flatten([[A082105(n,k) for k in range(n+1)] for n in range(14)]) # G. C. Greubel, Dec 22 2022

Formula

A(n, k) = (k*n)^2 + 4*(k*n) + 1 (square array).
A(n, n) = T(2*n, n) = A082106(n) (main diagonal).
T(n, k) = A(n-k, k) (number triangle).
Sum_{k=0..n} T(n, k) = A082107(n) (diagonal sums).
T(n, n-1) = A028872(n-1), n >= 1.
T(n, n-2) = A082109(n-2), n >= 2.
From G. C. Greubel, Dec 22 2022: (Start)
Sum_{k=0..n} (-1)^k * T(n, k) = ((1+(-1)^n)/2)*A016897(n-1).
T(2*n+1, n+1) = A047673(n+1), n >= 0.
T(n, n-k) = T(n, k). (End)

A190816 a(n) = 5*n^2 - 4*n + 1.

Original entry on oeis.org

1, 2, 13, 34, 65, 106, 157, 218, 289, 370, 461, 562, 673, 794, 925, 1066, 1217, 1378, 1549, 1730, 1921, 2122, 2333, 2554, 2785, 3026, 3277, 3538, 3809, 4090, 4381, 4682, 4993, 5314, 5645, 5986, 6337, 6698, 7069, 7450, 7841, 8242, 8653, 9074
Offset: 0

Views

Author

Keywords

Comments

For n >= 2, hypotenuses of primitive Pythagorean triangles with m = 2*n-1, where the sides of the triangle are a = m^2 - n^2, b = 2*n*m, c = m^2 + n^2; this sequence is the c values, short sides (a) are A045944(n-1), and long sides (b) are A002939(n).

Crossrefs

Short sides (a) A045944(n-1), long sides (b) A002939(n).
Cf. A017281 (first differences), A051624 (a(n)-1), A202141.
Sequences of the form m*n^2 - 4*n + 1: -A131098 (m=0), A028872 (m=1), A056220 (m=2), A045944 (m=3), A016754 (m=4), this sequence (m=5), A126587 (m=6), A339623 (m=7), A080856 (m=8).

Programs

  • Magma
    [5*n^2 - 4*n + 1: n in [0..50]]; // Vincenzo Librandi, Jun 19 2011
    
  • Mathematica
    Table[5*n^2 - 4*n + 1, {n, 0, 100}]
    LinearRecurrence[{3,-3,1},{1,2,13},100] (* or *) CoefficientList[ Series[ (-10 x^2+x-1)/(x-1)^3,{x,0,100}],x] (* Harvey P. Dale, May 24 2011 *)
  • PARI
    a(n)=5*n^2-4*n+1 \\ Charles R Greathouse IV, Oct 16 2015
    
  • SageMath
    [5*n^2-4*n+1 for n in range(41)] # G. C. Greubel, Dec 03 2023

Formula

From Harvey P. Dale, May 24 2011: (Start)
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3); a(0)=1, a(1)=2, a(2)=13.
G.f.: (1 - x + 10*x^2)/(1-x)^3. (End)
E.g.f.: (1 + x + 5*x^2)*exp(x). - G. C. Greubel, Dec 03 2023

Extensions

Edited by Franklin T. Adams-Watters, May 20 2011
Showing 1-10 of 34 results. Next