login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A095083 Fibodious primes, i.e., primes p whose Zeckendorf-expansion A014417(p) contains an odd number of 1-fibits. 5

%I

%S 2,3,5,13,17,19,31,41,43,59,61,71,73,79,89,103,107,113,131,151,167,

%T 173,179,181,191,197,211,227,229,233,239,251,257,269,293,307,313,347,

%U 349,353,367,383,401,419,431,433,449,457,463,467,479,487,491

%N Fibodious primes, i.e., primes p whose Zeckendorf-expansion A014417(p) contains an odd number of 1-fibits.

%H Indranil Ghosh, <a href="/A095083/b095083.txt">Table of n, a(n) for n = 1..656</a>

%H A. Karttunen and J. Moyer, <a href="/A095062/a095062.c.txt">C-program for computing the initial terms of this sequence</a>

%o (Python)

%o from sympy import fibonacci, primerange

%o def a(n):

%o k=0

%o x=0

%o while n>0:

%o k=0

%o while fibonacci(k)<=n: k+=1

%o x+=10**(k - 3)

%o n-=fibonacci(k - 1)

%o return x

%o def ok(n): return str(a(n)).count("1")%2

%o print([n for n in primerange(1, 1001) if ok(n)]) # _Indranil Ghosh_, Jun 08 2017

%Y Intersection of A000040 and A020899. Cf. A095084, A095063.

%K nonn

%O 1,1

%A _Antti Karttunen_, Jun 01 2004

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 27 18:27 EDT 2021. Contains 346308 sequences. (Running on oeis4.)