%I#19 2022年6月30日08:37:33
%S 6,10,15,21,22,30,33,34,35,39,42,46,51,55,57,58,65,66,69,70,78,82,85,
%电话87,91,93,94,95102105111114115118123129130133138141,
%电话:142145154155165166174177178185186190195201202
%N s>=3且N>=3的无平方多边形数P(s,N)。
%C该序列的主要条目是A090466=顺序(或秩)大于2的多边形数。
%C特殊多边形数A324973构成包含所有Carmichael数A002997的子序列。见Kellner和Sondow 2019。
%H Bernd C.Kellner和Jonathan Sondow,<a href=“http://math.colgate.edu/~integers/v52/v52.pdf“>关于Carmichael和多边形数、Bernoulli多项式和以p为底的数字之和</a>,integers 21(2021),#A52,21 pp.;arXiv:<a href=”https://arxiv.org/abs/1902.10672“>1902.10672</a>[math.NT],2019年。
%H Bernd C.Kellner,<a href=“http://math.colgate.edu/~integers/w38/w38.pdf“>关于主Carmichael数</a>,integers 22(2022),#A38,39 pp.;arXiv:<a href=”https://arxiv.org/abs/1902.11283“>1902.11283</a>[math.NT],2019年。
%H维基百科,<a href=“https://en.wikipedia.org/wiki/Polygonal_number(英文)“>多边形编号</a>
%F无平方P(s,n)=(n^2*(s-2)-n*(s-4))/2,其中s>=3且n>=3。
%e P(3,3)=6是平方自由的,因此a(1)=6。
%t mx=250;n=s=3;lst={};
%t当[s<楼层[mx/3]+2时,a=(n^2(s-2)-n(s-4))/2;
%t如果[a<mx+1,附加到[lst,a],(s++;n=2)];n++];lst=工会@lst;
%t选择[lst,SquareFreeQ]
%o(PARI)isok(n)=如果(!issquarefree(n),return(0));对于(s=3,n\3+1,ispolygonal(n,s)&&return(s));\\_米歇尔·马库斯,2019年3月24日
%A005117和A090466的Y交点。
%Y包括A324973,其中包含A002997。
%K nonn公司
%O 1,1号机组
%A _伯恩德·凯尔纳和乔纳森·索多,2019年3月21日
|