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.
%I A095281 #13 Aug 17 2022 03:39:38 %S A095281 2,5,7,13,23,31,41,47,73,83,89,107,109,149,151,157,167,191,193,227, %T A095281 233,251,269,277,293,311,337,353,379,397,421,431,439,463,479,523,541, %U A095281 547,557,599,607,617,641,659,683,691,701,709,719,727,733,743 %N A095281 Upper Wythoff primes, i.e., primes in A001950. %C A095281 Contains all primes p whose Zeckendorf-expansion A014417(p) ends with an odd number of 0's. %H A095281 Antti Karttunen and J. Moyer, <a href="/A095062/a095062.c.txt">C-program for computing the initial terms of this sequence</a> %o A095281 (Python) %o A095281 from math import isqrt %o A095281 from itertools import count, islice %o A095281 from sympy import isprime %o A095281 def A095281_gen(): # generator of terms %o A095281 return filter(isprime,((n+isqrt(5*n**2)>>1)+n for n in count(1))) %o A095281 A095281_list = list(islice(A095281_gen(),30)) # _Chai Wah Wu_, Aug 16 2022 %Y A095281 Intersection of A000040 & A001950. Complement of A095280 in A000040. Cf. A095081, A095083, A095084, A095290. %K A095281 nonn %O A095281 1,1 %A A095281 _Antti Karttunen_, Jun 04 2004