|
|
A343654型 |
| n的除数>1的两两互质集的个数。 |
|
7
|
|
|
1, 2, 2, 3, 2, 5, 2, 4, 3, 5, 2, 8, 2, 5, 5, 5, 2, 8, 2, 8, 5, 5, 2, 11, 3, 5, 4, 8, 2, 15, 2, 6, 5, 5, 5, 13, 2, 5, 5, 11, 2, 15, 2, 8, 8, 5, 2, 14, 3, 8, 5, 8, 2, 11, 5, 11, 5, 5, 2, 25, 2, 5, 8, 7, 5, 15, 2, 8, 5, 15, 2, 18, 2, 5, 8, 8, 5, 15, 2, 14, 5, 5
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
|
|
链接
|
|
|
例子
|
n=1、2、4、6、8、12、24、30、32、36、48时的a(n)集:
{} {} {} {} {} {} {} {} {} {} {}
{2} {2} {2} {2} {2} {2} {2} {2} {2} {2}
{4} {3} {4} {3} {3} {3} {4} {3} {3}
{6} {8} {4} {4} {5} {8} {4} {4}
{2,3}{6}{6}{6}{16}{6}{6}
{12} {8} {10} {32} {9} {8}
{2,3} {12} {15} {12} {12}
{3,4} {24} {30} {18} {16}
{2,3} {2,3} {36} {24}
{3,4} {2,5} {2,3} {48}
{3,8} {3,5} {2,9} {2,3}
{5,6} {3,4} {3,4}
{2,15} {4,9} {3,8}
{3,10} {3,16}
{2,3,5}
|
|
数学
|
pwcop[y_]:=与@@(GCD@@#1==1&)/@子集[y,{2}];
表[Length[Select[Subsets[Rest[Divisors[n]],pwcop]],{n,100}]
|
|
交叉参考
|
囊性纤维变性。A007360型,A051026号,A062319号,A074206号,A087087号,A101268号,A285572型,A305713型,A320423型,A326675型,A337485型,A343655型.
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|