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.

A329572 For all n >= 0, exactly 12 sums are prime among a(n+i) + a(n+j), 0 <= i < j < 7; lexicographically earliest such sequence of distinct nonnegative numbers.

Original entry on oeis.org

0, 1, 2, 5, 6, 11, 12, 17, 26, 35, 36, 47, 24, 54, 77, 7, 43, 60, 13, 30, 96, 4, 67, 97, 16, 133, 34, 3, 40, 27, 63, 100, 10, 20, 171, 9, 8, 51, 21, 22, 52, 15, 32, 38, 75, 141, 56, 41, 71, 122, 152, 45, 68, 29, 59, 14, 39, 44, 50, 23, 53, 57, 74, 107, 170, 176, 93, 134, 137, 86, 177, 65, 476, 62, 87, 92, 101
Offset: 0

Views

Author

M. F. Hasler, Feb 09 2020

Keywords

Comments

That is, there are 12 primes, counted with multiplicity, among the 21 pairwise sums of any 7 consecutive terms.
This is the theoretical maximum: there can't be more than 12 primes in pairwise sums of 7 distinct numbers > 1. See the wiki page for more details.
Conjectured to be a permutation of the nonnegative integers. See A329573 for the "positive" variant: same definition but with offset 1 and positive terms, leading to a quite different sequence.
For a(3) and a(4) resp. a(5) one must forbid the values < 5 resp. < 11 which would be the greedy choices, in order to get a solution for a(7), but from then on, the greedy choice gives the correct solution, at least for several hundred terms.

Crossrefs

Cf. A055273 (analog starting with a(1) = 1), A055265 & A128280 (1 prime using 2 terms), A055266 & A253074 (0 primes using 2 terms), A329405 - A329416, A329425, A329333, A329449 - A329456, A329563 - A329581.

Programs

  • PARI
    {A329572(n,show=0,o=0,N=12,M=6,D=[3,5,4,6,5,11],p=[],u=o,U)=for(n=o+1,n, show>0&& print1(o","); show<0&& listput(L,o); U+=1<<(o-u); U>>=-u+u+=valuation(U+1,2); p=concat(if(#p>=M,p[^1],p),o); D&& D[1]==n&& [o=D[2],D=D[3..-1]]&& next; my(c=N-sum(i=2,#p, sum(j=1,i-1, isprime(p[i]+p[j])))); for(k=u,oo,bittest(U,k-u)|| min(c-#[0|p<-p,isprime(p+k)],#p>=M)|| [o=k,break]));show&&print([u]);o} \\ optional args: show=1: print a(o..n-1), show=-1: append them on global list L, in both cases print [least unused number] at the end. See the wiki page for more.

A099256 Expansion of g.f. (3-x)*(1+3*x+x^2)/((1-x-x^2)*(1+x-x^2)).

Original entry on oeis.org

3, 8, 9, 23, 24, 61, 63, 160, 165, 419, 432, 1097, 1131, 2872, 2961, 7519, 7752, 19685, 20295, 51536, 53133, 134923, 139104, 353233, 364179, 924776, 953433, 2421095, 2496120, 6338509, 6534927, 16594432, 17108661, 43444787, 44791056, 113739929, 117264507, 297775000, 307002465, 779585071
Offset: 0

Views

Author

Creighton Dement, Oct 18 2004

Keywords

Comments

One of two sequences involving the Lucas/Fibonacci numbers. This sequence consists of pairs of numbers more or less close to each other with "jumps" in between pairs.
a(n+3) + a(n) - a(n+2) appears to be mysteriously connected with a(n+1).
Both this sequence and A099255 were created using "Floretion dynamical symmetries" (see link for further details).

Crossrefs

Cf. A000045, A099255, A000032, A055273 (bisection), A097134 (bisection).

Programs

  • Mathematica
    LinearRecurrence[{0,3,0,-1},{3,8,9,23},40] (* Harvey P. Dale, Apr 22 2012 *)

Formula

a(2n+2) - a(2n+1) = Fibonacci(2n-1).
A099255(n)/2 - a(n)/2 = (-1)^n*A000032(n)
a(0) = 3, a(1) = 8, a(2) = 9, a(3) = 23, a(n+4) = 3a(n+2) - a(n).
a(2n) = A022086(2n+2), a(2n+1) = A022097(2n+2).
a(n) = A013655(n+2)-A061084(n+1).

Extensions

Definition corrected, extended. - R. J. Mathar, Nov 13 2008

A141751 Triangle, read by rows, where T(n,k) = [T(n-1,k-1)*T(n-1,k) + 1]/T(n-2,k-1) for 0=0 and T(n,0) = Fibonacci(2*n-1) for n>=1.

Original entry on oeis.org

1, 1, 1, 2, 2, 1, 5, 5, 3, 1, 13, 13, 8, 4, 1, 34, 34, 21, 11, 5, 1, 89, 89, 55, 29, 14, 6, 1, 233, 233, 144, 76, 37, 17, 7, 1, 610, 610, 377, 199, 97, 45, 20, 8, 1, 1597, 1597, 987, 521, 254, 118, 53, 23, 9, 1, 4181, 4181, 2584, 1364, 665, 309, 139, 61, 26, 10, 1
Offset: 0

Views

Author

Paul D. Hanna, Jul 04 2008

Keywords

Examples

			Generating rule.
Given nonzero elements W, X, Y, Z, relatively arranged like so:
.. W .....
.. X Y ...
.... Z ...
then Z = (X*Y + 1)/W.
Triangle begins:
1;
1, 1;
2, 2, 1;
5, 5, 3, 1;
13, 13, 8, 4, 1;
34, 34, 21, 11, 5, 1;
89, 89, 55, 29, 14, 6, 1;
233, 233, 144, 76, 37, 17, 7, 1;
610, 610, 377, 199, 97, 45, 20, 8, 1;
1597, 1597, 987, 521, 254, 118, 53, 23, 9, 1;
4181, 4181, 2584, 1364, 665, 309, 139, 61, 26, 10, 1; ...
		

Crossrefs

Programs

  • PARI
    T(n,k)=if(n
    				
  • PARI
    T(n,k)=fibonacci(2*(n-k))*k+fibonacci(2*(n-k)-1)
    for(n=0,12,for(k=0,n,print1(T(n,k),", "));print(""))

Formula

T(n,k) = Fibonacci(2*(n-k)-1) + k*Fibonacci(2*(n-k)) for 0<=k<=n.
Showing 1-3 of 3 results.