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-3 of 3 results.

A206525 a(n) = 113*(n-1) - a(n-1) with n>1, a(1)=51.

Original entry on oeis.org

51, 62, 164, 175, 277, 288, 390, 401, 503, 514, 616, 627, 729, 740, 842, 853, 955, 966, 1068, 1079, 1181, 1192, 1294, 1305, 1407, 1418, 1520, 1531, 1633, 1644, 1746, 1757, 1859, 1870, 1972, 1983, 2085, 2096, 2198, 2209
Offset: 1

Views

Author

Vincenzo Librandi, Mar 09 2012

Keywords

Comments

Positive numbers k such that k^2 == 2 (mod 113), where the prime 113 == 1 (mod 8).
Equivalently, numbers k such that k == 51 or 62 (mod 113).

Crossrefs

Sequences of the type n^2 == 2 (mod p), where p is a prime of the form 8k+1: A155449, A158803, A159007, A159008, A176010.
Sequences of the type n^2 == 2 (mod p), where p is a prime of the form 8k-1: A047341, A155450, A164131, A164135, A167533, A167534, A177044, A177046, A204769.

Programs

  • Magma
    [(-113-91*(-1)^n+226*n)/4: n in [1..60]];
  • Mathematica
    LinearRecurrence[{1, 1, -1}, {51, 62, 164}, 40] (* or *) CoefficientList[Series[x*(51+11*x+51*x^2)/((1+x)*(x-1)^2), {x, 0, 40}], x] (* or *) a[1] = 51; a[n_] := a[n] = 113*(n-1) - a[n-1]; Table[a[n], {n, 1, 40}]

Formula

a(n) = a(n-2) + 113.
G.f.: x*(51+11*x+51*x^2)/((1+x)*(x-1)^2).
a(n) = (-113-91*(-1)^n+226*n)/4.
a(n) = a(n-1)+a(n-2)-a(n-3).
Sum_{n>=1} (-1)^(n+1)/a(n) = tan(11*Pi/226)*Pi/113. - Amiram Eldar, Feb 28 2023

A204766 a(n) = 167*(n-1)-a(n-1) with n>1, a(1)=13.

Original entry on oeis.org

13, 154, 180, 321, 347, 488, 514, 655, 681, 822, 848, 989, 1015, 1156, 1182, 1323, 1349, 1490, 1516, 1657, 1683, 1824, 1850, 1991, 2017, 2158, 2184, 2325, 2351, 2492, 2518, 2659, 2685, 2826, 2852, 2993, 3019, 3160
Offset: 1

Views

Author

Vincenzo Librandi, Mar 09 2012

Keywords

Comments

Positive numbers k such that k^2 == 2 (mod 167), where the prime 167 == -1 (mod 8).
Equivalently, numbers k such that k == 13 or 154 (mod 167).

Crossrefs

Sequences of the type n^2 == 2 (mod p), where p is a prime of the form 8k-1: A047341, A155450, A164131, A164135, A167533, A167534, A177044, A177046, A204769.
Sequences of the type n^2 == 2 (mod p), where p is a prime of the form 8k+1: A155449, A158803, A159007, A159008, A176010, A206525, A206526.

Programs

  • Magma
    [(-167+115*(-1)^n+334*n)/4: n in [1..60]];
  • Mathematica
    CoefficientList[Series[x*(13+141*x+13*x^2)/((1+x)*(x-1)^2), {x, 0, 40}], x] (* or *) LinearRecurrence[{1, 1, -1}, {13, 154, 180}, 40]

Formula

G.f.: x*(13+141*x+13*x^2)/((1+x)*(x-1)^2).
a(n) = (-167+115*(-1)^n+334*n)/4.
a(n) = a(n-1)+a(n-2)-a(n-3).
Sum_{n>=1} (-1)^(n+1)/a(n) = cot(13*Pi/167)*Pi/167. - Amiram Eldar, Feb 28 2023

A206526 a(n) = 137*(n-1) - a(n-1) with n>1, a(1)=31.

Original entry on oeis.org

31, 106, 168, 243, 305, 380, 442, 517, 579, 654, 716, 791, 853, 928, 990, 1065, 1127, 1202, 1264, 1339, 1401, 1476, 1538, 1613, 1675, 1750, 1812, 1887, 1949, 2024, 2086, 2161, 2223, 2298, 2360, 2435, 2497, 2572, 2634, 2709, 2771, 2846, 2908, 2983
Offset: 1

Views

Author

Vincenzo Librandi, Mar 09 2012

Keywords

Comments

Positive numbers k such that k^2 == 2 (mod 137), where the prime 137 == 1 (mod 8).
Equivalently, numbers k such that k == 31 or 106 (mod 137).
The subsequence of primes begins: 31, 853, 1613, 1949, 2161. - Jonathan Vos Post, Mar 09 2012

Crossrefs

Sequences of the type n^2 == 2 (mod p), where p is a prime of the form 8k+1: A155449, A158803, A159007, A159008, A176010, A206525.
Sequences of the type n^2 == 2 (mod p), where p is a prime of the form 8k-1: A047341, A155450, A164131, A164135, A167533, A167534, A177044, A177046, A204769.

Programs

  • Magma
    [(-137+13*(-1)^n+274*n)/4: n in [1..60]];
    
  • Magma
    [n: n in [1..3000] | n^2 mod 137 eq 2]; // Vincenzo Librandi, Mar 31 2016
  • Mathematica
    LinearRecurrence[{1, 1, -1}, {31, 106, 168}, 40] (* or *) CoefficientList[Series[x*(31+75*x+31*x^2)/((1+x)*(x-1)^2), {x, 0, 50}], x] (* or *) a[1] = 31; a[n_] := a[n] = 137*(n-1) - a[n-1]; Table[a[n], {n, 1, 40}]

Formula

a(n) = a(n-2) + 137.
G.f.: x*(31+75*x+31*x^2)/((1+x)*(x-1)^2).
a(n) = (-137+13*(-1)^n+274*n)/4.
a(n) = a(n-1)+a(n-2)-a(n-3).
Sum_{n>=1} (-1)^(n+1)/a(n) = cot(31*Pi/137)*Pi/137. - Amiram Eldar, Feb 28 2023
Showing 1-3 of 3 results.