A059661-OEIS公司

A059661号

喜欢A059459号，但每个术语都必须大于前一个术语。

2, 3, 7, 23, 31, 4127, 4159, 20543, 134238271, 134238527, 167792959, 1241534783, 3389018431, 72108495167, 72108503359, 72108765503, 2722258935367507707706996859526254457151, 2722258935367507707708149781030861304127, 13611294676837538538536137218847444070719

(列表;图表;参考;听;历史;文本;内部格式)

抵消

1,1

链接

n=1..19时的n，a（n）表。

N.J.A.斯隆，XORnos和DIFF的Maple实现

配方奶粉

a（n）=2+和{k=1..n-1}2^A059662号（k） ●●●●-蓬图斯·冯·布罗姆森2023年1月7日

MAPLE公司

flip_primes_asc_search：=进程（a，upto_bit，upto_length）局部i，n，t；如果（nops（a）>=upto_length），则返回（a）；fi；t:=a[nops（a）]；对于从0到upto_bit的i，n：=异或数（t，（2^i））；如果（i素数（n）和（n>t）），则打印（[op（a），n]）；返回（flip_primes_asc_search（[op（a），n]，upto_bit，upto_length））；fi；od；RETURN（[op（a），`不再有`]）；结束；

flip_primes_asc_search（[2]，512，21）；

数学

uptobit=512；上伸长度=17；清除[f]；f[a_]：=f[a]=模[{n，i，t}，如果[Length[a]>=上托梁长度，返回[a]]；t=a[[-1]]；对于[i=0，i<=uptobit，i++，n=BitX或[t，2^i]；如果[PrimeQ[n]&&n>t，则返回[f[Append[a，n]]]]]；A059661号=f[{2}](*让-弗朗索瓦·奥尔科弗2016年3月7日，改编自枫叶*）

黄体脂酮素

（Python）

从sympy导入isprime

从itertools导入islice

定义代理（）：

an，位=2，1

为True时：

产量

当&bit或not为素数（an+bit）时：bit<<=1

an+=位；位=1

打印（列表（islice（agen（），17））#迈克尔·布拉尼基2022年10月1日

交叉参考