%我#11 2017年8月26日08:23:42
%S 1,1,2,3,2,3,4,5,6,3,5,7,2,4,5,17,8,3,7,9,6,10,5,7,11,6,10,12,3,5,9,11,
%电话:13,14,15,6,10,12,14,15,5,7,11,13,17,6,10,12,14,15,18,3,7,9,11,13,17,
%U 19,10,20,15,21,6,10,12,14,15,18,20,21,22,5,7,11
%N行读取的不规则三角形:第N行列出了A038566(N)的术语m,使得A001221(m)=A051265(N),其中a(1)=1。
%C考虑A051265(n),1≤m≤n的A001221(m)的最大值,即gcd(m,n)=1(即m在还原残渣系统中或n的RRS中,或m是n的总和)。该序列的第n行由RRS(n)中的m组成,因此ω(m)=A051265(n)。
%H Michael De Vlieger,n表,前1000行的a(n),展平</a>
%e三角形开始:
%e n T(n,m)A051265(n)
%e 1:10
%电子2:10
%e三:2 1
%e四:3 1
%电子5:2 3 4 1
%e 6:5 1
%电子7:6 2
%电子8:3 5 7 1
%电子邮箱:2 4 5 7 8 1
%电子10:3 7 9 1
%电子11:6 10 2
%电子12:5 7 11 1
%电子13:6 10 12 2
%电子14:3 5 9 11 13 1
%电子15:14 2
%电子16:15 2
%电子17:6 10 12 14 15 2
%电子18:5 7 11 13 17 1
%电子19:6 10 12 14 15 18 2
%电子邮箱:3 7 9 11 13 17 19 1
%t表[MaxialBy[#,Last][All,1]]&@Map[{#,PrimeNu@#}&,事例[范围[n-1],k_/;互质Q[n,k]]/。{}->{1},{n,30}]//压扁(*迈克尔·德弗里格,2017年8月11日*)
%Y参见A001221、A002110、A038566、A048597、A051250、A051265、A051266、A051267、A051268。
%K nonn,简单,tabf
%氧1,3
%2017年8月11日,A _Michael De Vlieger_
|