搜索: a185700-编号:a185700
|
|
A059966号
|
| a(n)=(1/n)*Sum_{d除以n}mu(n/d)*(2^d-1)。 |
|
+10 143
|
|
|
1, 1, 2, 3, 6, 9, 18, 30, 56, 99, 186, 335, 630, 1161, 2182, 4080, 7710, 14532, 27594, 52377, 99858, 190557, 364722, 698870, 1342176, 2580795, 4971008, 9586395, 18512790, 35790267, 69273666, 134215680, 260300986, 505286415, 981706806
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,3
|
|
评论
|
在1,2,3等中有一个生成元的自由李代数的齐次部分的维数(分区数的李模拟)。
这个序列是划分序列的Lie模拟(它给出了每度一个生成器的齐次多项式的维数),或者类似的,是划分成不同(或奇数)的划分序列(它给出每维一个生成器外代数的齐次部分的维数)。
在从矩形末端反复切割一个正方形的过程中,矩形形状长度n的循环数。例如,长度为1的一个循环是金色矩形大卫·帕西诺(davepasino(AT)yahoo.com),2009年1月29日
在音乐中,在给定的节奏下,由具有相同模式的1和0(其中0表示没有节拍,1表示一个节拍)的节拍的连续重复而产生的不同节奏的数量,其中每个节拍允许n个具有相同特征的可能节拍,并且当在这两个条件下计算时:(i)测量的开始和结束时间未知或无关,并且(ii)通过使用少于n个可能节拍的测量可以产生的相同节奏被排除在计数之外-理查德·福伯格2013年4月22日
理查德·福伯格(Richard R.Forberg)的评论不支持n=1,因为a(1)=1,但有两种可能的节奏:“0”和“1”-赫伯特·科西姆巴2016年10月24日
对于n=1,注释是成立的,因为节奏“0”可以通过使用0拍的度量来产生,因此注释的条件(ii)将其从a(1)=1中排除-特拉维斯斯科特2022年5月28日
a(n)也是和为n的Lyndon成分(正整数的非周期项链)的数量-古斯·怀斯曼2017年12月19日
|
|
参考文献
|
C.Reutenauer,自由李代数,Clarendon出版社,牛津(1993)。
|
|
链接
|
S.V.Duzhin和D.V.Pasechnik,项链上的群组和沙堆群组《数学科学杂志》,2014年8月,第200卷,第6期,第690-697页。见第85页N.J.A.Sloane,2014年6月30日
Michael J.Mossinghoff和Timothy S.Trudgian,两个omegas的故事,arXiv:1906.02847[math.NT],2019年。
|
|
配方奶粉
|
G.f.:产品{n>0}(1-q^n)^a(n)=1-q^2-q^3-q^4-…=2-1/(1-q)。
G.f.:总和{k>=1}mu(k)*log((1-x^k)/(1-2*x^k-伊利亚·古特科夫斯基2019年5月19日
Dirichlet g.f.:f(s+1)/zeta(s+1”)-1,其中f(s)=和{n>=1}2^n/n^s-宋嘉宁2021年11月13日
|
|
例子
|
a(4)=3:三个元素[a,c],[a[a,b]]和d构成自由李代数中所有4次齐次元素的基础,生成元a为1次,b为2次,c为3次,d为4次。
林登的作品以总和为序:
(1),
(2),
(3),(12),
(4),(13),(112),
(5),(14),(23),(113),(122),(1112),
(6),(15),(24),(114),(132),(123),(1113),(1122),(11112),
(7),(16),(25),(115),(34),(142),(124),(1114),(133),(223),(1213),(1132),(1123), (11113),(1222),(11212),(11122),(111112). (结束)
|
|
数学
|
表[1/n应用[Plus,Map[(MoebiusMu[n/#](2^#-1))&,Divisors[n]],{n,20}]
(*第二个节目:*)
表[(1/n)除数总和[n,MoebiusMu[n/#](2^#-1)&],{n,35}](*迈克尔·德弗利格,2019年7月22日*)
|
|
黄体脂酮素
|
(哈斯克尔)
a059966 n=总和(地图(\x->a008683(n`div`x)*a000225 x)
[d|d<-[1..n],mod n d==0])`div`n
(Python)
从sympy import mobius,除数
定义A059966号(n) :返回除数(n,生成器=True)中d的和(mobius(n//d)*(2**d-1))//n#柴华武2022年2月3日
|
|
交叉参考
|
囊性纤维变性。A000225号,A000740号,A008683号,A008965号,A011782号,A060223号,A185700个,A228369号,A269134号 A281013型,A296302型,A296373型.
|
|
关键词
|
非n,容易的,美好的
|
|
作者
|
|
|
扩展
|
描述由Axel Kleinschmidt更正,2002年9月15日
|
|
状态
|
经核准的
|
|
|
|
|
A296372型
|
| 行读取三角形:T(n,k)是长度为n的正常序列数,其标准因式分解为Lyndon单词(非周期项链)具有k个因子。 |
|
+10 21
|
|
|
1, 1, 2, 4, 5, 4, 18, 31, 18, 8, 108, 208, 153, 56, 16, 778, 1700, 1397, 616, 160, 32, 6756, 15980, 14668, 7197, 2196, 432, 64, 68220, 172326, 171976, 93293, 31564, 7208, 1120, 128
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,3
|
|
评论
|
如果有限序列的并是正整数的初始区间,则该序列是正规序列。
|
|
链接
|
|
|
例子
|
T(3,2)=5正常序列为{2,1,2},{1,2,1},},2,1,3},[2,3,1},[3,1,2]。
三角形开始:
1;
1, 2;
4, 5, 4;
18, 31, 18, 8;
108, 208, 153, 56, 16;
778, 1700, 1397, 616, 160, 32;
6756, 15980, 14668, 7197, 2196, 432, 64;
|
|
数学
|
neckQ[q_]:=数组[OrderedQ[{q,RotateRight[q,#]}]&,长度[q]-1,1,And];
aperQ[q_]:=UnnameQ@@Table[旋转右[q,k],{k,长度[q]}];
qit[q_]:=如果[#===长度[q],{q},前缀[qit[Drop[q,#]],Take[q,#]]&[Max@@Select[Range[Length[q]],neckQ[Take[q,#]]&&aperQ[Take[q,#1]]&]];
allnorm[n_]:=函数[s,数组[Count[s,y_/;y<=#]+1&,n]]/@子集[Range[n-1]+1];
表[Length[Select[Join@@Permutations/@allnorm[n],Length[Cit[#]]==k&]],{n,5},{k,n}]
|
|
黄体脂酮素
|
EulerMT(u)={my(n=#u,p=x*Ser(u),vars=变量(p));Vec(exp(总和(i=1,n,substvec(p+O(x*x^(n\i)),vars,apply(v->v^i,vars))/i))-1)}
U(n,k)={sumdiv(n,d,moebius(n/d)*k^d)/n}
A(n)={[Vecrev(p/y)|p<-sum(k=1,n,EulerMT(向量(n,n,y*U(n,k)))*sum(j=k,n,(-1)^(k-j)*二项式(j,k)]}
{my(T=A(10));对于(n=1,#T,打印(T[n]))}\\安德鲁·霍罗伊德,2018年12月8日
|
|
交叉参考
|
囊性纤维变性。A000740号,A001045号,A008965号,A019536年,A059966号,A074650型,A185700个,A228369号,A232472号,A277427型,A281013型,A296373型.
|
|
关键词
|
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|
|
A254040型
|
| 原始(=非周期)n珠项链的数量T(n,k),带有k种不同颜色的彩色珠子;三角形T(n,k),n>=0,0<=k<=n,按行读取。 |
|
+10 19
|
|
|
1, 0, 1, 0, 0, 1, 0, 0, 2, 2, 0, 0, 3, 9, 6, 0, 0, 6, 30, 48, 24, 0, 0, 9, 89, 260, 300, 120, 0, 0, 18, 258, 1200, 2400, 2160, 720, 0, 0, 30, 720, 5100, 15750, 23940, 17640, 5040, 0, 0, 56, 2016, 20720, 92680, 211680, 258720, 161280, 40320
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,9
|
|
评论
|
不允许翻倒项链。
换言之:T(n,k)是长度为n且最大值为k的正规Lyndon词的数量,其中,如果有限序列跨越正整数的初始间隔,那么它就是正规序列-古斯·怀斯曼2017年12月22日
|
|
链接
|
|
|
配方奶粉
|
T(n,k)=和{j=0..k}(-1)^j*C(k,j)*A074650型(n,k-j)。
|
|
例子
|
三角形T(n,k)开始于:
1;
0, 1;
0, 0, 1;
0, 0, 2, 2;
0, 0, 3, 9, 6;
0, 0, 6, 30, 48, 24;
0、0、9、89、260、300、120;
0, 0, 18, 258, 1200, 2400, 2160, 720;
0, 0, 30, 720, 5100, 15750, 23940, 17640, 5040;
...
T(4,3)=9个长度为4且最大为3的正常林登单词是:123313231332122311321213-古斯·怀斯曼2017年12月22日
|
|
MAPLE公司
|
使用(numtheory):
b: =proc(n,k)选项记忆`如果`(n=0,1,
加法(mobius(n/d)*k^d,d=除数(n))/n)
结束时间:
T: =(n,k)->加(b(n,k-j)*二项式(k,j)*(-1)^j,j=0..k):
seq(seq(T(n,k),k=0..n),n=0..10);
|
|
数学
|
b[n_,k_]:=b[n,k]=如果[n==0,1,和[MoebiusMu[n/d]*k^d,{d,除数[n]}]/n];T[n_,k_]:=和[b[n,k-j]*二项式[k,j]*(-1)^j,{j,0,k}];表[表[T[n,k],{k,0,n}],{n,0,10}]//展平(*Jean-François Alcover公司2015年1月27日之后阿洛伊斯·海因茨*)
LyndonQ[q_]:=q==={}||Array[OrderedQ[{q,RotateRight[q,#]}]&,Length[q]-1,1,And]&&Array[Rotate右[q,#]&,长度[q],1,UnsameQ];
allnorm[n_,k_]:=如果[k===0,如果[n===0,{{}},{}],连接@@置换/@函数[s,数组[Count[s,y_/;y<=#]+1&,n]]/@选择[Subsets[Range[n-1]+1],Length[#]==k-1&]];
表[Length[Select[allnorm[n,k],LyndonQ]],{n,0,7},{k,0,n}](*古斯·怀斯曼2017年12月22日*)
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
A226062型
|
| a(n)=应用于n的二进制展开的游程中编码的分区的保加利亚纸牌运算。 |
|
+10 16
|
|
|
0, 1, 3, 2, 13, 7, 6, 6, 11, 29, 15, 58, 9, 14, 4, 14, 19, 27, 61, 54, 245, 31, 122, 52, 27, 25, 30, 50, 25, 12, 12, 30, 35, 23, 59, 46, 237, 125, 118, 44, 235, 501, 63, 1002, 233, 250, 116, 40, 51, 19, 57, 38, 229, 62, 114, 36, 59, 17, 28, 34, 57, 8, 28, 62
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,3
|
|
评论
|
在“保加利亚纸牌游戏”中,一副纸牌或另一组有限的物体被分成一堆或多堆,“保加利亚操作”是从每堆纸牌中取出一张纸牌,并将其堆成一堆。最初提出的问题是:在什么条件下,生成的分区最终会达到一个固定点,即操作不会改变的堆集合。请参阅Martin Gardner参考和Wikipedia页面。
A037481号给出了该序列的不动点,这些不动点是编码三角分区的数字:1+2+3+…+n.(名词)。
也,A123975号回答了保加利亚纸牌游戏中n大小的纸牌有多少个伊甸园隔断,对应于作为此序列项不出现的值。
|
|
参考文献
|
马丁·加德纳(Martin Gardner),《数学巨著》(Colossal Book of Mathematics),第34章,保加利亚纸牌游戏和其他看似无止境的任务,第455-467页,诺顿公司(W.W.Norton&Company),2001年。
|
|
链接
|
伊桑·阿金和莫顿·戴维斯,“保加利亚纸牌”,《美国数学月刊》92(4):237-250。(1985).
|
|
配方奶粉
|
其他身份:
|
|
例子
|
5具有二进制扩展“101”,其运行长度为[1,1,1],并转换为无序分区{1+1+1}。
6具有二进制扩展“110”,其运行长度为[1,2](我们从右向左扫描位的运行),它们被转换为无序分区{1+2}。
7具有二进制扩展名“111”,其运行长度列表为[3],它被转换为分区{3}。
在“保加利亚操作”中,我们从每个部分中减去一个(1个部分消失),然后添加一个与原来部分大小相同的新部分,以便总金额保持不变。
因此,从编码为5,{1,1,1}的分区开始,运算的形式为1-1,1-1,-1-(三个1都消失),但附加了第3部分,因为原来有三个部分,因此我们得到了一个新的分区{3}。因此,a(5)=7。
从分区{3}->3-1和1得到一个新分区{1,2},因此a(7)=6。
对于分区{1+2}->1-1和2-1,因此第一部分消失,第二部分现在是1,我们在其中添加了新的部分2,因为原来有两个部分,因此{1+2}保持为{1+2neneneep,并且我们已经到达了一个固定点,a(6)=6。
|
|
黄体脂酮素
|
(MIT/GNU方案)
(定义(A226062型n) (如果(零?n)n(ascpart_to_binexp(保加利亚操作(binexp_to_ascpart n)))
(定义(保加利亚操作ascpart)
(定义(binexp_to_ascpart n)(let(runlist(reverse!(binexp->runcount1list n))
(define(ascpart_to_binexp ascpart)(runcount1list->binexp(reverse!(cons(car ascpPart)(map 1+(DIFF ascpard))))
(定义(binexp->runcount1list n)(if(零?n)(列表)(let loop((n n)(rc(列表))(计数0)(prev bit(module n 2)))
(定义(运行计数列表->binexp列表)(let循环((列表列表)(s 0)(状态1))(cond((null?列表)s)(else(循环(cdr列表)(+(*s(导出2(汽车列表))))(*状态(-(导出2,汽车列表)1)))
(定义(DIFF a)(映射-(cdr a)(反向!(cdr(反向a))))
(定义(零件a)(cdr(反向!(左折(λ(磅数n)(cons(+n(汽车磅数)))(列表0)a)))
|
|
交叉参考
|
|
|
关键词
|
非n,基础
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
A296373型
|
| 三角形T(n,k)=将n分解为Lyndon单词(非周期项链)的长度为k的n的组成数。 |
|
+10 16
|
|
|
1, 1, 1, 2, 1, 1, 3, 3, 1, 1, 6, 5, 3, 1, 1, 9, 12, 6, 3, 1, 1, 18, 21, 14, 6, 3, 1, 1, 30, 45, 27, 15, 6, 3, 1, 1, 56, 84, 61, 29, 15, 6, 3, 1, 1, 99, 170, 120, 67, 30, 15, 6, 3, 1, 1, 186, 323, 254, 136, 69, 30, 15, 6, 3, 1, 1, 335, 640, 510, 295, 142, 70, 30, 15, 6, 3, 1, 1
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,4个
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
三角形开始:
1;
1, 1;
2, 1, 1;
3, 3, 1, 1;
6, 5, 3, 1, 1;
9, 12, 6, 3, 1, 1;
18, 21, 14, 6, 3, 1, 1;
30, 45, 27, 15, 6, 3, 1, 1;
56、84、61、29、15、6、3、1、1;
99, 170, 120, 67, 30, 15, 6, 3, 1, 1;
186, 323, 254, 136, 69, 30, 15, 6, 3, 1, 1;
335, 640, 510, 295, 142, 70, 30, 15, 6, 3, 1, 1;
|
|
数学
|
neckQ[q_]:=数组[OrderedQ[{RotateRight[q,#],q}]&,长度[q]-1,1,And];
aperQ[q_]:=取消命名q@@表格[RotateRight[q,k],{k,Length[q]}];
qit[q_]:=如果[#===长度[q],{q},前缀[qit[Drop[q,#]],Take[q,#]]&[Max@@Select[Range[Length[q]],neckQ[Take[q,#]]&&aperQ[Take[q,#1]]&]];
表[Length[Select[Join@@Permutations/@IntegerPartitions[n],Length[qit[#]]==k&]],{n,12},{k,n}]
|
|
黄体脂酮素
|
(PARI)EulerMT(u)={my(n=#u,p=x*Ser(u),vars=variables(p));Vec(exp(sum(i=1,n,substvec(p+O(x*x^(n\i))),vars,apply(v->v^i,vars))/i))-1)}
A(n)=[Vecrev(p/y)|p<-EulerMT(y*向量(n,n,sumdiv(n,d,moebius(n/d)*(2^d-1))/n)]
{my(T=A(12));对于(n=1,#T,打印(T[n]))}\\安德鲁·霍罗伊德,2018年12月1日
|
|
交叉参考
|
囊性纤维变性。A000740号,A001045号,A008965号,A019536年,A059966号,A060223号,A185700个,A228369号,A232472号,A277427型,A281013型,A296302型,A296372型.
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
A294859型
|
| 三角形,其第n行是按字典顺序排列的n的所有Lyndon组合的串联序列。 |
|
+10 12
|
|
|
1, 2, 1, 2, 3, 1, 1, 2, 1, 3, 4, 1, 1, 1, 2, 1, 1, 3, 1, 2, 2, 1, 4, 2, 3, 5, 1, 1, 1, 1, 2, 1, 1, 1, 3, 1, 1, 2, 2, 1, 1, 4, 1, 2, 3, 1, 3, 2, 1, 5, 2, 4, 6, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 3, 1, 1, 1, 2, 2, 1, 1, 1, 4, 1, 1, 2, 1, 2, 1, 1, 2, 3, 1, 1, 3, 2, 1
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
林登构图三角形开始:
(1),
(2),
(12),(3),
(112),(13),(4),
(1112),(113),(122),(14),(23),(5),
(11112),(1113),(1122),(114),(123),(132),(15),(24),(6),
(111112),(11113),(11122),(1114),(11212),(1123),(1132),(115),(1213),(1222),(124),(133),(142),(16),(223),(25),(34),(7).
|
|
数学
|
LyndonQ[q_]:=数组[OrderedQ[{q,RotateRight[q,#]}]&,Length[q]-1,1,And]&&Array[Rotate右[q,#]&,长度[q],1,UnsameQ];
表[Sort[Select[Join@@Permutations/@IntegerPartitions[n],LyndonQ],OrderedQ[PadRight[{#1,#2}]&],{n,7}]
|
|
交叉参考
|
囊性纤维变性。A000740号,A001037号,A001045号,A008965号,A059966号,A060223号,A066099型,A101211号,A102659号,A124734号,A185700个,A228369号,A281013型,A296302型,A296373型,A296656型.
|
|
关键词
|
非n,标签
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1、1、1、3、5、12、18、42、72、145、262、522、960、1879、3531、6831、13013、25148、48177、93186、179507、347509、671955、1303257、2527162、4910681、9545176、18579471、36183505、70540861、137603801、268655547、524842088、1026067205、2007118657、3928564113
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,4
|
|
评论
|
我们将环形链定义为行序列和列序列在所有可能的旋转下的矩阵等价类。如果n×k矩阵的行序列和列序列的所有n×k旋转都是不同的,则该矩阵是非周期的。
|
|
链接
|
S.N.Ethier,计数环形二进制阵列,J.国际顺序。16 (2013) #13.4.7.
|
|
例子
|
a(6)=18环形项链的不等价代表:
[6] [1 5] [2 4] [1 1 4] [1 2 3] [1 3 2] [1 1 1 3] [1 1 2 2] [1 1 1 1 2]
.
[1] [2] [1 1]
[5] [4] [1 3]
.
[1] [1] [1]
[1] [2] [3]
[4] [3] [2]
.
[1] [1]
[1] [1]
[1] [2]
[3] [2]
.
[1]
[1]
[1]
[1]
[2]
|
|
数学
|
素数MS[n_]:=如果[n==1,{},扁平[Cases[FactorInteger[n],{p_,k_}:>表[PrimePi[p],{k}]]];
facs[n_]:=如果[n<=1,{{}},连接@@表[Map[Prepend[#,d]&,Select[facs[n/d],Min@@#>=d&]],{d,Rest[Divisors[n]]}];
ptnmats[n_]:=并集@@置换/@Select[Union@@(Tuples[Permutations/@#]&/@Map[primeMS,facs[n],{2}]),SameQ@@Length/@#&];
apromatQ[m_]:=取消命名Q@@Join@@Table[RotateLeft[m,{i,j}],{i、Length[m]},{j、Length[First[m]]}];
颈垫Q[m_]:=m==第一个[Union@@Table[RotateLeft[m,{i,j}],{i;长度[m]},{j,长度[First[m]]}];
表[If[n==0,1,Length[Union@@Table[Select[ptnmats[k],And[apematQ[#],neckmatQ[#]]&],{k,Times@@Prime/@#&/@IntegerPartitions[n]}]],{n,0,10}]
|
|
黄体脂酮素
|
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
1, 2, 12, 72, 540, 4668, 47292, 545760, 7087248, 102247020, 1622632572, 28091562840, 526858348380, 10641342923148, 230283190977300, 5315654681435520, 130370767029135900, 3385534663249753392, 92801587319328411132, 2677687796244281955480, 81124824998504073834516
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
如果一个有限序列跨越一个正整数的初始区间,那么它就是正规序列。如果每个循环旋转都不同,那么它是非周期性的。
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
a(3)=12非周期正态序列为112、121、122、123、132、211、212、213、221、231、312、321。
长度为6的15个非周期正常序列为:111111、112112、121121、121212、122122、123123、132132、211211、212121、212212、213213、221221、231231、312312、321321。
|
|
数学
|
表[DivisorSum[n,MoebiusMu[n/#]*Sum[k!*StirlingS2[#,k],{k,#}]&],{n,25}]
|
|
黄体脂酮素
|
b(n)={polcoef(serlaplace(1/(2-exp(x+O(x*x^n))),n)}
a(n)={sumdiv(n,d,moebius(d)*b(n/d))}\\安德鲁·霍罗伊德2018年8月29日
|
|
交叉参考
|
囊性纤维变性。A000670号,A000740号,A001037号,A019536年,A027375号,A060223号,A095684号,A185700个,1996年6月,A296977型,A296978型.
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
1966年2月
|
| 三角形,其第n行是n的所有Lyndon成分按逆图解顺序串联的序列。 |
|
+10 6
|
|
|
1, 2, 3, 1, 2, 4, 1, 3, 1, 1, 2, 5, 2, 3, 1, 4, 1, 2, 2, 1, 1, 3, 1, 1, 1, 2, 6, 2, 4, 1, 5, 1, 3, 2, 1, 2, 3, 1, 1, 4, 1, 1, 2, 2, 1, 1, 1, 3, 1, 1, 1, 1, 2, 7, 3, 4, 2, 5, 2, 2, 3, 1, 6, 1, 4, 2, 1, 3, 3, 1, 2, 4, 1, 2, 2, 2, 1, 2, 1, 3, 1, 1, 5, 1, 1, 3, 2
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
林登构图三角形开始:
(1),
(2),
(3),(12),
(4),(13),(112),
(5),(23),(14),(122),(113),(1112),
(6),(24),(15),(132),(123),(114),(1122),(1113),(11112),
(7),(34),(25),(223),(16),(142),(133),(124),(1222),(1213),(115),(1132),(1123),(11212),(1114),(11122),(11113),(111112).
|
|
数学
|
LyndonQ[q_]:=数组[OrderedQ[{q,RotateRight[q,#]}]&,Length[q]-1,1,And]&&Array[Rotate右[q,#]&,长度[q],1,UnsameQ];
表[Sort[Select[Join@@Permutations/@IntegerPartitions[n],LyndonQ],OrderedQ[PadRight[{#2,#1}]&],{n,7}]
|
|
交叉参考
|
囊性纤维变性。A000740号,A001037号,A001045号,A008965号,A059966号,A060223号,A066099型,A101211号,A102659号,A124734号,A185700个,A228369号,A281013型,A294859型,A296302型,A296373型.
|
|
关键词
|
非n,标签
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
0, 1, 1, 2, 1, 4, 1, 5, 3, 8, 1, 16, 1, 20, 9, 35, 1, 69, 1, 110, 21, 188, 1, 381, 7, 632, 59, 1184, 1, 2300, 1, 4115, 189, 7712, 25, 14939, 1, 27596, 633, 52517, 1, 101050, 1, 190748, 2247, 364724, 1, 703331, 19, 1342283, 7713, 2581430, 1, 4985609, 193
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,4个
|
|
评论
|
a(n)是n的组成数,其中n不是林登单词,但形式为p*p*…*其中,*是串联,p是林登单词。
|
|
链接
|
|
|
配方奶粉
|
a(n)=Sum_{d|n}(2^d-1)*(φ(n/d)-mu(n/d))/n。
|
|
例子
|
a(12)=16个组成:11111111111111111121113111131121121122112211141141212121211231313131321321515222222222242433334444,66。
|
|
数学
|
表[Sum[DivisorSum[d,MoebiusMu[d/#]*(2^#-1)&]/d,{d,大多数@除数[n] }],{n,100}]
|
|
黄体脂酮素
|
(PARI)a(n)=sumdiv(n,d,(2^d-1)*(eulerphi(n/d)-moebius(n/d))/n)\\米歇尔·马库斯2018年1月31日
|
|
交叉参考
|
囊性纤维变性。A000005号,A000031号,A000740号,A000961号,A001045号,A008965号,A019536年,A034691号,A051953号,A052823号,A059966号,A060223号,A178472号,A185700个,A296302型,A296373型.
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.017秒内完成
|