%I#20 2020年5月15日04:38:05

%S 1,2,4,5,9,10,18,26,34,38,45,50,57,88108115161208224225238240，

%电话：264354597634984100810801468

%N指数k，其中A191620（k）=A191751（k）。

%传真{k:A191620（k）=A191751（k）}。

%e1是一个术语，因为A191620（1）=A191751（1）=0；

%e2是一个术语，因为A191620（2）=A191751（2）=1。

%p A191751:=进程（n）局部k；对于0中的k，如果是isprime（（2^n-1）*2^n-k），则返回k:end-if：end-do：end-proc：

%p A191620:=proc（n）local k：对于0中的k do，如果是isprime（（2^n-k）*2^n-1），则返回k：end if：end do：end-proc：

%如果A191751（n）=A191620（n），则打印f（“%d，\n”，n）；结束条件：；结束日期：#R.J.Mathar，2011年6月25日

%Y参考A191620、A191751。

%K non，少，多

%O 1,2号机组

%A _Juri-Stepan Gerasimov，2011年6月15日

%E a（25）-a（30），来自王金源，2020年5月15日