%我#2023年3月1日27日14:42:52
%S 1,2,3,1,2,4,5,6,7,3,8,9,4,10,11,12,13,5,6,14,15,16,17,7,18,19,8,20,
%电话:21,22,23,9,10,24,25,26,27,11,12,28,29,30,31,13,32,33,14,34,35,36,37,
%U 15,16,38,39,40,41,17,42,43,18,44,45,46,47,19,20,48,49,50
%N序列的整数正好出现两次。在k的两个副本之间有k个奇数整数。序列总是用最小整数进行扩展,不会导致矛盾。
%e两个1s之间有一个奇数:这是整数3;
%两个2s之间有两个奇数:它们是3和1;
%e在两个3之间有三个奇数整数:它们是1、5和7;等。
%t lst={1};k=2;
%t Do[While[FreeQ[lst,k]&&Count[lst[[First@@Position[ls,t]+1;;]],a_/;奇数Q@a]!=t、 附录[lst,k];k++];lst=附加到[lst,t],{t,25}];第1页(*_Giorgos Kalogeropouls_2023年2月28日*)
%Y参考A132291。
%K nonn公司
%O 1、2
%A _Eric Angelini,2023年2月12日
%E更多条款,来自金元网,2023年2月14日
|