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.

Previous Showing 11-12 of 12 results.

A343496 First point of the straight lines in A340649.

Original entry on oeis.org

5, 31, 194, 1061, 6456, 40080, 251721, 1617206, 10553419, 69709769, 465769825
Offset: 1

Views

Author

Simon Strandgaard and Jamie Morken, Apr 17 2021

Keywords

Comments

prime(a(n)+1) - prime(a(n)) = n*2. E.g., for n=4: prime(a(4)+1) - prime(a(4)) = 4*2, prime(1062) - prime(1061) = 4*2, 8521 - 8513 = 8.

Examples

			For n=1, consider k's with prime gap 1*2 = 2, i.e., k's such that A001223(k)=2. k=5 is the first place where A001223(k)=2 and A141042(k)=A340649(k), so a(1)=5.
For n=2, consider k's with prime gap 2*2 = 4, i.e., k's such that A001223(k)=4. k=31 is the first place where A001223(k)=4 and A141042(k)=A340649(k), so a(2)=31.
For n=3, consider k's with prime gap 3*2 = 6, i.e., k's such that A001223(k)=6. k=194 is the first place where A001223(k)=6 and A141042(k)=A340649(k), so a(3)=194.
		

Crossrefs

Programs

  • Ruby
    n = 1
    last_prime = 2
    find_gap = 2
    result = []
    Prime.each(10_000) do |prime|
        next if prime == 2
        gap = prime - last_prime
        if gap == find_gap
            value = (n * prime) % last_prime
            if value == n * gap
                result << n
                find_gap += 2
            end
        end
        n += 1
        last_prime = prime
    end
    p result

Formula

a(n) = smallest k that satisfies A001223(k) = 2*n and A340649(k) = A141042(k).

A152563 Primes in A152535.

Original entry on oeis.org

5, 11, 37, 61, 107, 181, 467, 563, 821, 947, 2341, 2939, 3833, 4073, 5479, 6043, 9161, 9281, 11399, 12323, 14249, 15263, 16007, 22027, 25117, 26249, 32189, 37987, 39581, 42139, 42853, 43093, 50291, 54449, 62653, 64063, 64919, 70181, 73189, 82219
Offset: 1

Views

Author

Omar E. Pol, Dec 07 2008

Keywords

Crossrefs

Programs

  • Maple
    A001223 := proc(n) ithprime(n+1)-ithprime(n) ; end: A141042 := proc(n) option remember ; n*A001223(n) ; end: A152535 := proc(n) add(A141042(i),i=1..n) ; end: for n from 1 to 300 do a35 := A152535(n) ; if isprime(a35) then printf("%d,",a35) ; fi; od: # R. J. Mathar, Feb 06 2009

Extensions

More terms from R. J. Mathar, Feb 06 2009
Previous Showing 11-12 of 12 results.