A095088 - OEIS

A095088

Fib100 primes, i.e., primes p whose Zeckendorf-expansion A014417(p) ends with one and two final zeros.

3, 11, 37, 71, 79, 113, 139, 181, 223, 257, 283, 359, 367, 401, 409, 443, 503, 571, 587, 613, 647, 757, 859, 977, 1019, 1087, 1163, 1181, 1223, 1231, 1291, 1307, 1367, 1409, 1451, 1511, 1553, 1579, 1613, 1621, 1663, 1697, 1723, 1867, 1901

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

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)).endswith("100")

print([n for n in primerange(1, 2001) if ok(n)]) # Indranil Ghosh, Jun 08 2017

CROSSREFS

Intersection of A000040 and A035337. Cf. A095068.

Sequence in context: A178563 A069358 A108544 * A306362 A007138 A046107

Adjacent sequences: A095085 A095086 A095087 * A095089 A095090 A095091

KEYWORD

nonn

AUTHOR

Antti Karttunen, Jun 01 2004

STATUS

approved