A095087 Fib010 primes, i.e., primes p whose Zeckendorf-expansion A014417(p) ends with zero, one and zero.

7, 23, 31, 41, 83, 109, 151, 167, 193, 227, 269, 277, 311, 337, 353, 379, 397, 421, 431, 439, 463, 523, 541, 557, 599, 607, 617, 641, 659, 701, 709, 719, 727, 743, 761, 769, 811, 829, 853, 863, 887, 929, 947, 997, 1031, 1049, 1091, 1117, 1151

Offset

1,1

Links

Table of n, a(n) for n=1..49.

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

Prog

(Python)
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))[-3:]=="010"
print([n for n in primerange(1, 1201) if ok(n)]) # Indranil Ghosh, Jun 08 2017

Crossrefs

Intersection of A000040 and A035336. Cf. A095067.

Sequence in context: A078515 A225822 A044449 * A144517 A225185 A091531

Adjacent sequences: A095084 A095085 A095086 * A095088 A095089 A095090

Keyword

nonn

Author

Antti Karttunen, Jun 01 2004

Status

approved