OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者

 

标志
提示
(来自的问候整数序列在线百科全书!)
搜索: a141809-编号:a141808
显示找到的20个结果中的1-10个。 第页12
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
A027748号 第一行为1的不规则三角形,第n行(n>1)列出n的不同素因子。 +10
227
1, 2, 3, 2, 5, 2, 3, 7, 2, 3, 2, 5, 11, 2, 3, 13, 2, 7, 3, 5, 2, 17, 2, 3, 19, 2, 5, 3, 7, 2, 11, 23, 2, 3, 5, 2, 13, 3, 2, 7, 29, 2, 3, 5, 31, 2, 3, 11, 2, 17, 5, 7, 2, 3, 37, 2, 19, 3, 13, 2, 5, 41, 2, 3, 7, 43, 2, 11, 3, 5, 2, 23, 47, 2, 3, 7, 2, 5, 3, 17, 2, 13, 53, 2, 3, 5, 11, 2, 7, 3, 19, 2, 29, 59, 2, 3, 5, 61, 2, 31 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
第n行中的项数为A001221号(n) 对于n>1。
发件人莱因哈德·祖姆凯勒,2011年8月27日:(开始)
A008472号(n) =总和{k=1。。A001221号(n) }T(n,k),n>1;
A007947号(n) =产品{k=1。。A001221号(n) }T(n,k);
A006530号(n) =最大值{k=1。。A001221号(n) }T(n,k)。
A020639号(n) =最小值{k=1。。A001221号(n) }T(n,k)。
(结束)
的后续A027750型它列出了n的除数-米歇尔·马库斯2015年10月17日
链接
埃里克·魏斯坦的数学世界,独特的主要因素
例子
三角形开始:
1;
2;
三;
2;
5;
2, 3;
7;
2;
三;
2, 5;
11;
2, 3;
13;
2, 7;
...
枫木
使用(数字理论):[seq(系数集(n),n=1..100)];
数学
展平[Table[FactorInteger[n][[All,1]],{n,1,62}]](*Jean-François Alcover公司2011年10月10日*)
程序
(哈斯克尔)
导入数据。列表(展开器)
a027748 n k=a027748_tabl!!(n-1)!!(k-1)
a027748_tabl=映射a027748_row[1..]
a027748_行1=[1]
a027748_row n=展开器事实n,其中
事实1=无
事实x=只是(p,直到(>0)。(`mod`p))(`div`p)x)
其中p=a020639 x——x的最小素因子
--莱因哈德·祖姆凯勒2011年8月27日
(PARI)打印1(1);对于(n=2,20,f=系数(n)[,1];对于(i=1,#f,打印1(“,”f[i]))\\查尔斯·格里特豪斯四世,2013年3月20日
(Python)
从症状导入因子
对于范围(2101)内的n:
打印([i代表质数(n)中的i])#因德拉尼尔·戈什,2017年3月31日
交叉参考
囊性纤维变性。A000027号A001221号A001222号(重复),A027746号A141809号A141810号
一个(A013939号(A000040型(n) )+1)=A000040型(n) ●●●●。
囊性纤维变性。A020639号A027750型
A284411型给出了列中间值。
关键词
非n容易的选项卡美好的
作者
扩展
Scott Lindhurst(ScottL(AT)校友.princeton.edu)提供的更多术语
状态
经核准的
A008475型 如果n=乘积(p_j^k_j),则a(n)=总和(p_j ^k_j)(a(1)=0,按惯例)。 +10
58
0, 2, 3, 4, 5, 5, 7, 8, 9, 7, 11, 7, 13, 9, 8, 16, 17, 11, 19, 9, 10, 13, 23, 11, 25, 15, 27, 11, 29, 10, 31, 32, 14, 19, 12, 13, 37, 21, 16, 13, 41, 12, 43, 15, 14, 25, 47, 19, 49, 27, 20, 17, 53, 29, 16, 15, 22, 31, 59, 12, 61, 33, 16, 64, 18, 16, 67, 21, 26, 14, 71, 17, 73 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
对于n>1,a(n)是使对称群S_m具有n阶元素的最小数m——Ahmed Fares(ahmedfares(AT)my-deja.com),2001年6月26日
如果gcd(u,w)=1,则a(u*w)=a(u)+a(w);表现为对数;比较A001414号A056239号. -拉博斯·埃利默2003年3月31日
参考文献
F.J.Budden,《团体的魅力》,剑桥,1972年;第322、573页。
József Sándor、Dragoslav S.Mitrinovic和Borislav Crstic,《数论手册一》,Springer科学与商业媒体,2005年,第四章,第147页。
许振中,《关于大可加数论函数的若干求和》,《北京师范大学学报》1984年第2期,第11-18页。
链接
丹尼尔·福格斯,n=1..100000时的n,a(n)表(T.D.Noe的前10000个术语)
约翰·班伯格、格兰特·凯恩斯和德文·基尔明斯特,晶体限制、排列和哥德巴赫猜想阿默尔。数学。《月刊》,第110卷,第3期(2003年3月),第202-209页。
罗杰·艾格尔顿和威廉·加尔文,整数主因子和的上界《数学杂志》,第77卷,第3期(2004年6月),第190-200页。
配方奶粉
a(p^e)=p^e的加法。
一个(A000961号(n) )=A000961号(n) ;一个(A005117号(n) )=A001414号(A005117号(n) )。
a(n)=总和{k=1。。A001221号(n) }A027748号(n,k)^A124010型(n,k)对于n>1-莱因哈德·祖姆凯勒2011年10月10日
a(n)=总和{k=1。。A001221号(n) }A141809号(n,k)对于n>1-莱因哈德·祖姆凯勒,2013年1月29日
求和{k=1..n}a(k)~(Pi^2/12)*n^2/log(n)+O(n^2/log(n)^2)(Xuan,1984)-阿米拉姆·埃尔达尔2021年3月4日
例子
a(180)=a(2^2*3^2*5)=2^2+3^2+5=18。
枫木
A008475型:=proc(n)局部e,j;e:=系数(n)[2]:
添加(e[j][1]^e[j][2],j=1..nops(e))结尾:
序列(A008475型(n) ,n=1..60)#彼得·卢什尼2010年1月17日
数学
f[n_]:=加@@Power@@FactorInteger@n;f[1]=0;阵列[f,73]
程序
(PARI)对于(n=1100,打印1(总和(i=1,ω(n),分量(分量(因子(n)),1),i)^分量
(PARI)a(n)=局部(t);如果(n<1,0,t=系数(n);sum(k=1,matsize(t)[1],t[k,1]^t[k,2])/*迈克尔·索莫斯2004年10月20日*/
(PARI)A008475型(n) ={my(f=因子(n));vecsum(向量(#f~,i,f[i,1]^f[i、2]));}\\安蒂·卡图恩2017年11月17日
(哈斯克尔)
a008475 1=0
a008475 n=总额$1141809_row n
--莱因哈德·祖姆凯勒2013年1月29日,2011年10月10日
(Python)
来自sympy导入因子
定义a(n):
f=因子(n)
如果n==1,则返回0([i**f[i]表示f中的i)#因德拉尼尔·戈什2017年5月20日
交叉参考
请参见A222416型对于a(1)=1的变量。
关键词
非n美好的
作者
状态
经核准的
A115627号 行读取的不规则三角形:T(n,k)=素数(k)的重数作为n!的除数!。 +10
31
1, 1, 1, 3, 1, 3, 1, 1, 4, 2, 1, 4, 2, 1, 1, 7, 2, 1, 1, 7, 4, 1, 1, 8, 4, 2, 1, 8, 4, 2, 1, 1, 10, 5, 2, 1, 1, 10, 5, 2, 1, 1, 1, 11, 5, 2, 2, 1, 1, 11, 6, 3, 2, 1, 1, 15, 6, 3, 2, 1, 1, 15, 6, 3, 2, 1, 1, 1, 16, 8, 3, 2, 1, 1, 1, 16, 8, 3, 2, 1, 1, 1, 1 (列表;图表;参考;;历史;文本;内部格式)
抵消
2,4
评论
n!的因式分解!是n!=2^T(n,1)*3^T(n,2)**p_(pi(n))^T(n,pi(n))其中p_k=第k素数,pi=A000720号(n) ●●●●。
非零项A085604型; T(n,k)=A085604型(n,k),k=1。。A000720号(n) ●●●●-莱因哈德·祖姆凯勒2013年11月1日
对于n=2、3、4和5,第n行的所有项都是奇数。还有其他这样的行吗-米歇尔·马库斯2018年11月11日
发件人古斯·怀斯曼2019年5月15日:(开始)
连续行之间的差异是A067255美元,所以第n行是A067255号(右边用零填充,以便所有n个行向量都有长度A000720号(n) )。例如A067255号
{}
1
0 1
2 0
0 0 1
1 1 0
0 0 0 1
3 0 0 0
0 2 0 0
1 0 1 0
列总和(8,4,2,1)为第10行。
(结束)
对于所有素数p>7,3*p>2*nextprime(p),所以对于任何n>21,总是有一个素数p除以n!指数为2时,所有条目都为奇数的行不再存在-查理·内德2019年6月3日
链接
H.T.Davis,数学函数表,卷。第1和第2版,1963年,第3卷(与V.J.Fisher合著),1962年;德克萨斯州圣安东尼奥三一大学普林西比出版社【第2卷204-208页注释扫描】见第206页表2。
翟文光,关于n!的素数幂因子分解!《数论杂志》,第129卷,第8期,2009年8月,第1820-1836页。
配方奶粉
T(n,k)=Sum_{i=1..inf}楼层(n/(p_k)^i)。(虽然表示为无限和,但只有有限多个项是非零的。)
T(n,k)=总和{i=1..floor(log(n)/log(p_k)}floor(u_i),其中u_0=n和u_(i+1)=floor((u_i/p_k)-大卫·A·科内斯,2014年6月22日
例子
发件人古斯·怀斯曼2019年5月9日:(开始)
三角形开始:
1
1 1
3 1
3 1 1
4 2 1
4 2 1 1
7 2 1 1
7 4 1 1
8 4 2 1
8 4 2 1 1
10 5 2 1 1
10 5 2 1 1 1
11 5 2 2 1 1
11 6 3 2 1 1
15 6 3 2 1 1
15 6 3 2 1 1 1
16 8 3 2 1 1 1
16 8 3 2 1 1 1 1
18 8 4 2 1 1 1 1
(结束)
m:5^m|101!:地板(log(101)/log(5))=2项。地板(101/5)=20。地板(20/5)=4。所以m=u_1+u_2=20+4=24-大卫·A·科内斯,2014年6月22日
枫木
A115627号:=程序(n,k)局部d,p;p:=i素数(k);n-加(d,d=转换(n,基数,p));%/(第1页);结束进程:#R.J.马塔尔2010年10月29日
数学
扁平[Table[Transpose[FactorInteger[n!]][[2]],{n,2,20}]](*T.D.诺伊2012年4月10日*)
T[n_,k_]:=模[{p,jm},p=素数[k];jm=楼层[Log[p,n]];总和[楼层[n/p^j],{j,1,jm}]];表[Table[n,k],{k,1,PrimePi[n]}],{n,2,20}]//压扁(*Jean-François Alcover公司2015年2月23日*)
程序
(哈斯克尔)
a115627 n k=a115627_tabf!!(n-2)!!(k-1)
a115627_row=地图a100995。a141809低。a000142号
a115627_tabf=映射a115627行[2..]
--莱因哈德·祖姆凯勒2013年11月1日
(PARI)a(n)=我的(i=2);当(n-素数pi(i)>1时,n-=素数(i);i++);p=素数(n-1);总和(j=1,log(i)\log(p),i=p)\\大卫·A·科内斯2014年6月21日
交叉参考
行长度为A000720号
行数为A022559号
行产品是A135291号
行最大值为A011371美元
囊性纤维变性。A090622号A090623号A000142号A115628号
囊性纤维变性。A085604型A141809号
关键词
非n选项卡
作者
状态
经核准的
A053585号 如果n=p_1^e_1*…*p_k^e_k,p_1<…<p_k素数,则a(n)=p_k^e_k。 +10
28
1, 2, 3, 4, 5, 3, 7, 8, 9, 5, 11, 3, 13, 7, 5, 16, 17, 9, 19, 5, 7, 11, 23, 3, 25, 13, 27, 7, 29, 5, 31, 32, 11, 17, 7, 9, 37, 19, 13, 5, 41, 7, 43, 11, 5, 23, 47, 3, 49, 25, 17, 13, 53, 27, 11, 7, 19, 29, 59, 5, 61, 31, 7, 64, 13, 11, 67, 17, 23, 7, 71, 9, 73, 37, 25, 19, 11, 13, 79 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
设p是最大素数除以n,a(n)是p除以n的最大幂。
链接
阿洛伊斯·海因茨,n=1..10000时的n,a(n)表(T.D.Noe的前1000个术语)
配方奶粉
a(n)=A006530号(n)^A071178号(n) ●●●●-莱因哈德·祖姆凯勒2011年8月27日
a(n)=A141809号(n,A001221号(n) )-莱因哈德·祖姆凯勒2013年1月29日
例子
a(42)=7是因为42=2*3*7,a(144)=9是因为144=16*9=2^4*3^2。
枫木
a: =n->`if`(n=1,1,(i->i[1]^i[2])(排序(ifactors(n)[2])[-1])):
seq(a(n),n=1..100)#阿洛伊斯·海因茨2023年11月3日
数学
表[Power@@Last@FactorInteger@n,{n,79}](*Jean-François Alcover公司2011年4月1日*)
程序
(哈斯克尔)
a053585=最后。a141809_低--莱因哈德·祖姆凯勒2013年1月29日
(PARI)a(n)=如果(n>1,my(f=因子(n));f[#f~,1]^f[#f~,2],1)\\查尔斯·格里特豪斯四世2015年11月10日
(Python)
来自sympy导入因子,primefactors
定义a(n):
如果n==1:返回1
p=素数(n)[-1]
返回p**因子(n)[p]#因德拉尼尔·戈什2017年5月19日
交叉参考
不同于A034699号
关键词
非n容易的美好的
作者
弗雷德里克·马加塔(Frederick.Magata(AT)uni-muenster.de),2000年1月19日
扩展
Andrew Gacek(Andrew(AT)dgi.net)提供的更多条款,2000年4月20日
状态
经核准的
A028233号 如果n=p_1^e_1*…*p_k^e_k,p_1<…<p_k素数,则a(n)=p_1^e_1,a(1)=1。 +10
27
1, 2, 3, 4, 5, 2, 7, 8, 9, 2, 11, 4, 13, 2, 3, 16, 17, 2, 19, 4, 3, 2, 23, 8, 25, 2, 27, 4, 29, 2, 31, 32, 3, 2, 5, 4, 37, 2, 3, 8, 41, 2, 43, 4, 9, 2, 47, 16, 49, 2, 3, 4, 53, 2, 5, 8, 3, 2, 59, 4, 61, 2, 9, 64, 5, 2, 67, 4, 3, 2, 71, 8, 73, 2, 3, 4, 7, 2, 79, 16, 81, 2, 83, 4, 5, 2 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
最小素数除以n的最大幂-莱因哈德·祖姆凯勒2015年4月9日
链接
Reinhard Zumkeller,n=1..10000时的n,a(n)表(T.D.Noe的前1000个术语)
配方奶粉
a(n)=A020639号(n)^A067029号(n) ●●●●-莱因哈德·祖姆凯勒2006年5月13日
a(n)=A141809号(n,1)-莱因哈德·祖姆凯勒,2012年6月4日
a(n)=n/A028234号(n) ●●●●-安蒂·卡图恩2017年5月29日
例子
发件人穆尼鲁·A·阿西鲁2018年1月27日:(开始)
如果n=10,则a(10)=2,因为10=2^1*5^1。
如果n=16,则a(16)=16,因为16=2^4。
如果n=29,则a(29)=29,因为29=29^1。
(结束)
枫木
A028233号:=进程(n)
局部spf,pf;
如果n=1,则
返回1;
结束条件:;
spf:=A020639号(n) ;
对于ifactors(n)[2]do中的pf
如果pf[1]=spf,则
返回pf[1]^pf[2];
结束条件:;
结束do:
结束进程:#R.J.马塔尔2016年7月9日
#第二个Maple项目:
a: =n->`if`(n=1,1,(i->i[1]^i[2])(排序(ifactors(n)[2])[1])):
seq(a(n),n=1..100)#阿洛伊斯·海因茨2018年1月29日
数学
a[n_]:=幂@@First[FactorInteger[n]];表[a[n],{n,1,86}](*Jean-François Alcover公司2011年12月1日*)
程序
(哈斯克尔)
a028233=水头。a141809_低
--莱因哈德·祖姆凯勒,2012年6月4日,2011年8月17日
(PARI)a(n)=如果(n>1,n=系数(n);n[1,1]^n[1,2],1)\\查尔斯·格里特豪斯四世2012年4月26日
(Python)
来自sympy导入因子
定义a(n):
f=因子(n)
如果n==1,则返回1,否则为min(f)**f[min(f#因德拉尼尔·戈什2017年5月12日
(方案)
;; 天真地执行A020639号在该条目下给出。所有这些函数也可以用definec定义,以便在以后的调用中更快。请参见http://oeis.org/wiki/Memoization#方案
(定义(A028233号n) (如果(<n 2)n(let((lpf(A020639号n) ))(let loop((m lpf)(n(/n lpf)))(cond((not(zero?(module n lpf);;安蒂·卡图恩2017年5月29日
(GAP)列表(列表(列表)(列表(列出([1..10^3],因子),已收集),i->i[1]),j->j[1]^j[2])#穆尼鲁·A·阿西鲁2018年1月27日
交叉参考
另请参见A028234号
囊性纤维变性。A008475型
囊性纤维变性。A141809号
关键词
非n美好的容易的
作者
扩展
编辑名称以包含a(1)=1富兰克林·T·亚当斯-沃特斯2018年1月27日
状态
经核准的
A034684号 如果n=p_1^e_1*…*p_k^e_k,p_1<…<pk素数,则a(n)=min{pi^ei}。 +10
24
1, 2, 3, 4, 5, 2, 7, 8, 9, 2, 11, 3, 13, 2, 3, 16, 17, 2, 19, 4, 3, 2, 23, 3, 25, 2, 27, 4, 29, 2, 31, 32, 3, 2, 5, 4, 37, 2, 3, 5, 41, 2, 43, 4, 5, 2, 47, 3, 49, 2, 3, 4, 53, 2, 5, 7, 3, 2, 59, 3, 61, 2, 7, 64, 5, 2, 67, 4, 3, 2, 71, 8, 73, 2, 3, 4, 7, 2, 79, 5, 81, 2, 83, 3, 5, 2, 3, 8, 89, 2, 7, 4 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
a(1)=1;对于n>1,n的最小幺正因子大于1。
链接
配方奶粉
a(n)=最小值{A141809号(n,k):k=1。。A001221号(n) }-莱因哈德·祖姆凯勒,2013年1月29日
数学
A034684号[n_]:=最小值[(#[1]]^#[2]])&/@FactorInteger[n]];阵列[A034684号,100](*恩里克·佩雷斯·埃雷罗2011年11月1日*)
程序
(PARI)A034684号(n) ={局部(f,m);如果(n==1,1,f=因子(n);m=f[1,1]^f[1,2];对于(i=1,矩阵大小(f)[1],m=min\\迈克尔·波特2010年1月28日
(哈斯克尔)
a034684=最小值。a141809_低--莱因哈德·祖姆凯勒2013年1月29日
交叉参考
囊性纤维变性。A034444号A034448号A052125号
囊性纤维变性。A008475型
关键词
非n美好的容易的
作者
状态
经核准的
A287352型 不规则三角形T(n,k)=A112798号(n,1),然后是A112798号(n) ●●●●。 +10
22
0,1,2,1,0,3,1,1,4,1,0,2,0,1,2,5,1,0,1,6,1,3,2,1,0,0,0,7,1,1,0,8,1,0,2,2,1,4,9,1,0,1,3,0,1,5,2,0,1,1,1,0,0,0,0,0,2,3,1,1,1,0,12,1,7,2,4,1,0,0,2,13 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,3
评论
不规则三角形T(n,k)=n的素因子p的指数的第一差。
行长度=(大)Omega(n)=A001222号(n) ●●●●。
行总和=A061395号(n) ●●●●。
行最大值=A286469型(n) ●●●●。
我们可以连接行1<=n<=28,因为在此范围内k的值都不超过9:{0、1、2、10、3、11、4、100、20、12、5、101、6、13、21、1000、7、110、8、102、22、14、9、1001、30、15、200、103};a(29)={10},这需要大于9的数字。
按照惯例,a(1)=0。
a(0)未定义(即空集)。a(n)定义为正非零n。
a(p)=A000720号(p) 对于p素数。
a(p ^e)=A000720号(p) 后跟(e-1)零。
a(乘积(p^e))是n的酉素数幂因子p^e的a(p^e)的串联,按素数p排序(即函数a(n)映射到A141809号).
一个(A002110号(n) )=n个1s的数组。
T(n,k)可用于A054841美元(n) ●●●●。我们读取T(n,k)第n行的数据。如果T(n,1)=0,则写入0。如果T(n,1)>0,则从右侧增加第k位。对于k>1,在最后一个增加的位置右侧增加第k个位置。
T(n,k)可用于以十进制表示n。如果T(n,1)=0,则写1。如果T(n,1)>0,则将1乘以A000720号(T(n,1))。对于k>1,将前一乘积乘以pi(x)=A000720号(x) 每个k的T(n,k)运行总数的。
忽略n>1行中的零,并如上所述对T(n,k)的剩余值进行解码,得到n的方折射核=A007947号(n) ●●●●。
a(n)的前导零被删减,但在十进制记数法中,包含前导零的数字表示的是与没有前导零时相同的n。非零值之前的零只会将隐式1乘以自身,直到我们遇到非零值。因此,{0,0,2}=1*1*pi(2)=3,因为{2}=pi(3)=3。因此,对于T(n,k)的k=1,没有一行n>1具有0。
将二进制文件中的n解释为a(n)行A057335号(n) ●●●●。
链接
迈克尔·德弗利格,n=1..15568时的n,a(n)表(第1行<=n<=5000)。
配方奶粉
T(n,1)=A117798号(n,1);T(n,k)=A117798号(n,k)-A117798号(n,k-1)对于2<=k<=A001222号(n) ●●●●。
例子
a(1)={0}根据约定。
a(2)={pi(2)}={1}。
a(4)={pi(2),pi(3)-pi(2)},={1,0},因为4=2*2。
a(6)={pi(2),pi(3)-pi(2)}={1,1},因为6=2*3。
a(12)={pi(2),pi(3)-pi(2)-pi。
三角形开始于:
1: 0;
2比1;
3: 2;
4: 1, 0;
5: 3;
6: 1, 1;
7: 4;
8: 1, 0, 0;
9: 2, 0;
10: 1, 2;
11: 5;
12: 1, 0, 1;
13:6;
14: 1, 3;
15: 2, 1;
16: 1, 0, 0, 0;
17:7;
18: 1, 1, 0;
19: 8;
20: 1, 0, 2;
...
数学
表[Prepend[Differences@#,First@#]&Flatten[FactorInteger[n]/。{p,e}/;p>0:>ConstantArray[PrimePi@p,e]],{n,41}]//展平(*迈克尔·德弗利格2017年5月23日*)
交叉参考
关键词
非n选项卡容易的
作者
迈克尔·德弗利格2017年5月23日
状态
经核准的
A080737号 a(1)=a(2)=0;对于n>2,具有n阶对称性的格的最小维数。 +10
10
0, 0, 2, 2, 4, 2, 6, 4, 6, 4, 10, 4, 12, 6, 6, 8, 16, 6, 18, 6, 8, 10, 22, 6, 20, 12, 18, 8, 28, 6, 30, 16, 12, 16, 10, 8, 36, 18, 14, 8, 40, 8, 42, 12, 10, 22, 46, 10, 42, 20, 18, 14, 52, 18, 14, 10, 20, 28, 58, 8, 60, 30, 12, 32, 16, 12, 66, 18, 24, 10, 70, 10, 72, 36, 22, 20, 16, 14 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,3
链接
Reinhard Zumkeller,n=1..10000时的n,a(n)表
J.Bamberg、G.Cairns和D.Kilminster,晶体限制、排列和哥德巴赫猜想阿默尔。数学。每月,110(2003年3月),202-209。
萨维尼恩·克雷奇曼(Savinien Kreczman)、卢卡·普里吉奥尼埃罗(Luca Prigioniero)、埃里克·罗兰(Eric Rowland)和马诺·斯蒂普兰蒂(Manon Stipulanti),周期序列中的幻数Liège大学(比利时,2023年)。见第7页。
配方奶粉
对于n>2,a(2^r)=2^(r-1)且r>1,a(p^r)=phi(p^r)且p>2素数,r>=1,其中phi是欧拉函数A000010号; 通常如果a(乘积p_i^e_i)=和a(p_i^e_i)。
数学
a[1]=a[2]=0;a[p_?素数Q]:=a[p]=p-1;a[n_]:=a[n]=如果[Length[fi=FactorInteger[n]]==1,EulerPhi[n],总计[a/@(fi[[All,1]]^fi[[Al,2]])]];表[a[n],{n,1,78}](*Jean-François Alcover公司2012年6月20日*)
程序
(PARI)对于(n=1,78,k=0;如果(n>1,f=系数(n);k=总和(j=1,矩阵大小(f)[1],欧拉式(f[j,1]^f[j、2]));如果(f[1,1]==2&&f[1,2]==1,k-);打印1(k,“,”)\\克劳斯·布罗克豪斯2003年3月10日
(哈斯克尔)
a080737 n=a080737_列表!!(n-1)
a080737_list=0:(映射f[2..]),其中
f n | mod n 4==2=a080737$div n 2
|否则=a067240 n
--莱因哈德·祖姆凯勒,2012年6月13日,2012年7月11日
交叉参考
请参见A152455号用于其他版本。
关键词
非n容易的
作者
N.J.A.斯隆2003年3月8日
扩展
更多术语来自克劳斯·布罗克豪斯2003年3月10日
状态
经核准的
A210208型 按行读取的三角形,其中第n行列出了n的素数幂除数,A000961号 +10
9
1, 1, 2, 1, 3, 1, 2, 4, 1, 5, 1, 2, 3, 1, 7, 1, 2, 4, 8, 1, 3, 9, 1, 2, 5, 1, 11, 1, 2, 3, 4, 1, 13, 1, 2, 7, 1, 3, 5, 1, 2, 4, 8, 16, 1, 17, 1, 2, 3, 9, 1, 19, 1, 2, 4, 5, 1, 3, 7, 1, 2, 11, 1, 23, 1, 2, 3, 4, 8, 1, 5, 25, 1, 2, 13, 1, 3, 9, 27, 1, 2, 4, 7 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,3
评论
A073093号(n) =第n行的长度;
A023888号(n) =第n行之和;
A183091号(n) =第n行的乘积;
A034699号(n) =T(n,A073093号(n) )=第n行的最大值;
{T(n,k):k=1。。A073093号(n) }的子集{A027750型(n,k):k=1。。A000005号(n) }表示所有n。
链接
埃里克·魏斯坦的数学世界,除数
例子
1;
1, 2;
1, 3;
1、2、4;
1, 5;
1, 2, 3;
1, 7;
1, 2, 4, 8;
1, 3, 9;
1, 2, 5;
1, 11;
1, 2, 3, 4; -杰弗里·克雷策2015年2月8日
数学
表[Prepend[Select[Divisors[n],PrimeNu[#]==1&],1],{n,1,10}]//网格(*杰弗里·克雷策,2015年2月8日*)
程序
(哈斯克尔)
a210208 n k=a210208_tabf!!(n-1)!!(n-1)
a210208_row n=a210208_tabf!!(n-1)
a210208_tabf=映射(过滤器((==1))。a010055))a027750_tabf
交叉参考
囊性纤维变性。A010055型A141809号
关键词
非n选项卡
作者
状态
经核准的
A226078型 按行读取的表:中心二项式系数的主功率因数,参见。A000984号 +10
9
1, 2, 2, 3, 4, 5, 2, 5, 7, 4, 9, 7, 4, 3, 7, 11, 8, 3, 11, 13, 2, 9, 5, 11, 13, 4, 5, 11, 13, 17, 4, 11, 13, 17, 19, 8, 3, 7, 13, 17, 19, 4, 7, 13, 17, 19, 23, 8, 25, 7, 17, 19, 23, 8, 27, 25, 17, 19, 23, 16, 9, 5, 17, 19, 23, 29, 2, 9, 5, 17, 19, 23, 29, 31 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,2
评论
T(n,k)=A141809号(A000984号(n) ),k)对于k=0。。A067434号(n) -1。
链接
例子
.n初始行A000984号(n)A226047型(n)
. ---+------------------------------+-------------+------------
. 0 [1] 1
. 1 [2] 2 2
. 2 [2,3] 6 3
. 3 [4,5] 20 5
. 4 [2,5,7] 70 7
. 5 [4,9,7] 252 9
.6[4,3,7,11]924 11
. 7 [8,3,11,13] 3432 13
. 8 [2,9,5,11,13] 12870 13
. 9 [4,5,11,13,17] 48620 17
. 10 [4,11,13,17,19] 184756 19
. 11 [8,3,7,13,17,19] 705432 19
. 12 [4,7,13,17,19,23] 2704156 23
. 13 [8,25,7,17,19,23] 10400600 25
. 14 [8,27,25,17,19,23] 40116600 27
. 15 [16,9,5,17,19,23,29] 155117520 29
. 16 [2,9,5,17,19,23,29,31] 601080390 31
.17[4,27,5,11,19,23,29,31]2333606220 31
. 18 [4,3,25,7,11,19,23,29,31] 9075135300 31
. 19 [8,3,25,7,11,23,29,31,37] 35345263800 37
. 20 [4,9,5,7,11,13,23,29,31,37] 137846528820 37 .
枫木
f: =n->加(i[2]*x^i[1],i=i因子(n)[2]):
b: =proc(n)局部p;
p: =加(f(n+i)-f(i),i=1..n);
seq(`if`(系数(p,x,i)>0,
i^系数(p,x,i),空),i=1..度(p))
结束时间:
T: =n->`如果`(n=0,1,b(n)):
seq(T(n),n=0..30)#阿洛伊斯·海因茨2013年5月25日
数学
表[Power@@@FactorInteger[(2n)!/n!^2],{n,0,30}]//展平(*Jean-François Alcover公司2015年7月29日*)
程序
(哈斯克尔)
a226078 n k=a226078_tabf!!不!!k个
a226078_row n=a226078 _ tabf!!n个
a226078_tabf=映射a141809_行a000984_列表
交叉参考
囊性纤维变性。A067434号(行长度),A001316号(左边缘),A060308型(右边缘),A226047型(行最大值),A226083型(行最小值),A000984号(行产品)。
囊性纤维变性。A267823型
关键词
非n选项卡
作者
状态
经核准的
第页12

搜索在0.044秒内完成

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|转换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。

上次修改时间:美国东部夏令时2024年6月1日05:42。包含373010个序列。(在oeis4上运行。)