%I#14 2023年8月9日19:02:13

%S 2,3,4,5,8,7,10,9,10,13,16,13,14,15,22,17,20,23,24,29,38,29,26,41,26，

%电话：27,28,33,34,37,32,37,34,35,52,37,38,39,46,41,50,53,44,47,58,55,50,49，

%U 60,61,62,61,56,55,58,59,68,61,62/73,66,77,64,67,84,71

%N a（N）是最小的数>N，因此N ^4+a（N，N）^4是素数。

%关于指数2而不是4，请参见A089489：勾股三元组有一个素斜边。

%C具有奇指数u的对应序列是不可能的：x^u+y^u具有因子x+y。

%C a（2k-1）是偶数，a（2k）是奇数，b（n）-n是奇数。

%C猜想：a（n）对所有n都存在，即序列是定义明确的无限序列。

%C猜想：对于无穷多个n，a（n）-n=1。

%C n≤100时，a（n）-n的最大值出现在n=90:121-90=31。

%对于35个n≤100的值，C a（n）-n=1。

%H Harvey P.Dale，n表，n=1..1000的a（n）</a>

%e1^4+2^4=17是素数，所以a（1）=2。

%e2^4+3^4=97是素数，所以a（2）=3。

%e 5^4+6^4=1921=17*113，5^4+7^4=3026=2*17*89，5^4+8^4=4721是素数，所以a（5）=8。

%t sn[n_]：=模[{k=n+1，n4=n^4}，而[CompositeQ[n4+k^4]，k++]；k] ；数组[sn，80]（*_哈维P.戴尔，2023年8月9日*）

%o（岩浆）S:=[]；对于[1..72]中的n，做q：=n^4；k： =n+1；当不是IsPrime（q+k^4）时，执行k+：=1；结束while；附加（~S，k）；结束；S、 //年_Klaus Brockhaus_，2009年4月12日

%Y参考A089489。

%K容易，不是

%O 1,1号机组

%A Ulrich Krug（leuktfeuer37（AT）gmx.de），2009年4月1日

%E由Klaus Brockhaus编辑并验证条目，2009年4月12日

%E由Harvey P.Dale_修订，2023年8月9日