%I#20 2022年10月12日04:31:23

%S 4、15、17、19、29、57、77285318354379405205215956259381706，

%电话173820852345281743194529700582078232945198391104411170，

%电话：123861242112722141531522021537117052179651827918811198902162266722746

%N a（N）=最小数>a（N-1），使得a（1）*a（2）**a（n）+1和a（1）*a（2）**a（n）-1是素数。

%H Amiram Eldar，<a href=“/A051956/b051956.txt”>n，a（n）表，n=1。.184</a>

%ta[1]=4；a[n_]：=a[n]=For[k=a[n-1]+1，True，k++，p=Times@@Array[a，n-1]；如果[PrimeQ[k*p+1]&&PrimeQ[k*p-1]，打印[k]；返回[k]]]；阵列[a，45]（*_Jean-François Alcover_，2016年10月23日*）

%o（PARI）列表a（nn）={my（v=向量（nn，n））；对于（n=1，nn，如果（n==1，p=1；k=0；，p=prod（j=1，n-1，v[j]）；k=v[n-1]+1）；while（！isprime（p*k+1）||！isprim（p*k-1），k++）；v[n]=k；print1（k，“，”）；）；}马库斯，2013年9月28日

%Y参考A051935、A051957。

%很好，不

%O 1，1

%A_Felice Russo，1999年12月21日

%E更多来自米歇尔·马库斯的条款，2013年9月28日