%I#11 2018年6月26日06:36:12

%S 1,2,3,4,6,5,7,8,9,12,10,11,13,14,17,16,15,21,18,19,23,20,22,25,24,26，

%电话：27,28,29,37,30,31,33,32,34,35,36,38,39,43,40,41,42,44,47,45,46,53,48，

%U 49,51,50，52,55,54,59,57,57,56,58,67,60,61,63,62,64,65,66,68,69,72,70,71

%N a（N）=序列中较早出现的最小正整数，与第N个斐波那契数互素。

%C序列是正整数的置换。

%H Robert Israel，n的表，a（n）表示n=1..10000</a>

%e 55是第10个斐波那契数。在序列的前9项中没有出现的正整数中，12是最小的，与55互素，因此a（10）=12。10和11也不出现在序列的前9项中，但它们不是55的互质。

%p L：=[1..100]：#对于第一学期>100之前的所有学期

%从1do到n的p

%pv:=组合：fibonacci（n）；

%发现p：=false；

%p代表j从1到nops（L）do

%p如果igcd（L[j]，v）=1，则

%p A[n]：=L[j]；

%p L:=底土（j=NULL，L）；

%发现p：=true；

%p断点

%p fi；

%p od；

%p如果未找到，则断开fi

%日期：

%p序列（A[i]，i=1..n-1）；#_罗伯特·伊斯雷尔，2018年6月26日

%Y参考A000045，A121731。

%K非n

%O 1,2号机组

%A _罗伊查询，2006年8月18日

%E由雷·钱德勒于2006年8月22日延期