A095088 -id:A095088 - cp's OEIS frontend

A095068 Number of fib100 primes (A095088) in range ]2^n,2^(n+1)].

1, 0, 1, 0, 1, 3, 3, 8, 8, 22, 37, 69, 125, 238, 449, 831, 1545, 3004, 5597, 10760, 20524, 39321, 74899, 143666, 276562, 533106, 1025445, 1979842, 3824893, 7394481, 14325045, 27772689, 53894448, 104645081, 203424705

Offset: 1

Antti Karttunen, Jun 01 2004

Antti Karttunen and John Moyer, C-program for computing the initial terms of this sequence.
Index entries for sequences related to occurrences of various subsets of primes in range ]2^n,2^(n+1)].

Cf. A095062, A095065, A095088.

a(n) = A095062(n) - A095065(n).

a(34)-a(35) from Amiram Eldar, Jun 13 2024

A095082 Fib00 primes, i.e., primes p whose Zeckendorf-expansion A014417(p) ends with two zeros.

Original entry on oeis.org

3, 5, 11, 13, 29, 37, 47, 71, 73, 79, 89, 97, 107, 113, 131, 139, 149, 157, 173, 181, 191, 199, 223, 233, 241, 251, 257, 283, 293, 317, 359, 367, 401, 409, 419, 443, 461, 479, 487, 503, 521, 547, 563, 571, 587, 613, 631, 647, 673, 683, 691, 733

Offset: 1

Antti Karttunen, Jun 01 2004

nonn

A. Karttunen and J. Moyer, C-program for computing the initial terms of this sequence

Cf. A095062. Intersection of A000040 and A026274. Union of A095085 and A095088.

list(lim)=my(v=List(), w=quadgen(20), phi=(1+w)/2, p2=phi^2, x=(2*phi-2)*p2, q);  lim=lim\1+1; while(xCharles R Greathouse IV, Nov 10 2021

from sympy import fibonacci, primerange
def a(n):
    k=0
    x=0
    while n>0:
        k=0
        while fibonacci(k)<=n: k+=1
        x+=10**(k - 3)
        n-=fibonacci(k - 1)
    return x
def ok(n): return str(a(n))[-2:]=="00"
print([n for n in primerange(1, 1001) if ok(n)]) # Indranil Ghosh, Jun 08 2017

cp's OEIS Frontend

A095068 Number of fib100 primes (A095088) in range ]2^n,2^(n+1)].

Views

Author

Keywords

Links

Crossrefs

Formula

Extensions

A095082 Fib00 primes, i.e., primes p whose Zeckendorf-expansion A014417(p) ends with two zeros.

Views

Author

Keywords

Links

Crossrefs

Programs

PARI

Python