%I#23 2023年6月29日15:38:41

%S 1,0,0,15,01565111.35,012336571,15185653259,85,04369,39247，

%电话800005,39,551151731,85221135,35105821,51403,0516491939，

%电话31773293,9522833845697215143153667235435511485

%N最小奇数k>N，例如k|N^k+N，如果N=2^m，则为0。

%H Sean A.Irvine，<A href=“/A015908/b015908.txt”>n的表，A（n）表示n=0..136</a>

%t fk[n_]：=模[{k=n+1}，如果[EvenQ[k]，k++]；如果[IntegerQ[Log[2，n]]，k=0，而[Mod[n^k+n，k]=0，k+=2]]；k] ；数组[fk，60,0]（*_哈维·P·戴尔，2019年3月12日*）

%o（PARI）isp2（n）=（n==1）||（n==2）|||（i素数幂（n，&p）&&（p==2））；

%o a（n）={if（isp2（n），返回（0））；my（k=if（n%2，n+2，n+1））；while（lift（Mod（n，k）^k+Mod（n，k）），k+=2）；k；}马库斯，2018年12月19日

%Y参考A015906（不限制k的奇偶性）。

%K nonn公司

%0、4

%A _罗伯特·G·威尔逊v_

%E缺失a（0）=1，插入a（1）=0，并由_Sean a.Irvine_纠正a（5），2018年12月19日