%I#18 2023年1月17日15:34:37
%S 3,11,17,19,29,37,43,53,59,61,67,71,79,97101103113127131137139,
%电话163173179181197199211223229234257263271281283307,
%电话:313317331347349359367373383389401409419433
%N下Wythoff素数,即A000201中的素数。
%C包含Zeckendorf-expansion A014417(p)以偶数0结尾的所有素数p。
%C有关推广和推测,请参见A184774。
%H Robert Israel,<a href=“/A0952280/b095280.txt”>n表,n=1..10000的a(n)</a>
%H Antti Karttunen和J.Moyer,计算该序列初始项的c程序</a>
%p R:=NULL:计数:=0:
%当计数<100 do时,n从1开始为p
%p p:=地板(n*phi);
%p如果isprime(p),则R:=R,p;计数:=计数+1 fi
%日期:
%p R;编号_罗伯特·伊斯雷尔,2023年1月17日
%t(参见A184792。)
%o(Python)
%o从数学导入isqrt
%o从itertools导入计数,islice
%o来自sympy import isprime
%o def A095280_gen():#术语生成器
%o返回滤波器(i素数,(计数(1)中n的(n+isqrt(5*n**2)>>1))
%o A095280_list=list(岛屿(A095280_ gen(),30))#_Chai Wah Wu_,2022年8月16日
%A000040和A000201的Y交点。A000040中A095281的补充。参见A095080、A095083、A095084、A095290、A184792、A184783、A18479、A18476。
%K nonn公司
%O 1,1
%2004年6月4日,安蒂·卡图宁
|