编辑

经核准的

D.Bressoud，<a href=“http://www.macalester.edu/~bressoud/books/CNT.m“>CNT.m</a>计算数论Mathematica软件包。

经核准的

编辑

编辑

经核准的

最大值k，使得φ（k）=A007374号（n）),).

也就是说，最大数k使得phi（k）＝x，其中x是具有n个解的最小数-T.D.诺伊2013年4月14日

经核准的

编辑

编辑

经核准的

分配给T.D.Noe

最大值k，使得φ（k）=A007374号（n） ，

2, 6, 12, 30, 42, 120, 126, 150, 90, 210, 660, 1242, 7938, 2760, 1014, 270, 1470, 810, 3318, 630, 2370, 4830, 7590, 1386, 11220, 1680, 1260, 5082, 13890, 1050, 3570, 33750, 1890, 26082, 14058, 2310, 2730, 5670, 5250, 70140, 12690, 14280, 12474, 3990, 11850

2,1

T.D.Noe，<a href=“/A224532型/b224532.txt“>n表，n=2..1023</a>

需求[“CNT`”]；nn=50；t=表[0，{nn}]；n=0；左=nn-1；当[left>0时，n++；cnt=长度[PhiInverse[n]]；如果[cnt<=nn&&t[[cnt]]==0，t[[cnt]]=n；左--]]；联接[{0}，表[PhiInverse[n][[-1]]，{n，其余[t]}]]

囊性纤维变性。A224531型.

分配

非n

T.D.诺伊2013年4月11日

经核准的

编辑

分配给T.D.Noe

分配

经核准的