A265574-OEIS公司

A265574型

三角数的LCM变换。

1, 3, 2, 5, 1, 7, 2, 3, 1, 11, 1, 13, 1, 1, 2, 17, 1, 19, 1, 1, 1, 23, 1, 5, 1, 3, 1, 29, 1, 31, 2, 1, 1, 1, 1, 37, 1, 1, 1, 41, 1, 43, 1, 1, 1, 47, 1, 7, 1, 1, 1, 53, 1, 1, 1, 1, 1, 59, 1, 61, 1, 1, 2, 1, 1, 67, 1, 1, 1, 71, 1, 73, 1, 1, 1, 1, 1, 79, 1, 3, 1, 83, 1, 1, 1, 1, 1, 89, 1, 1, 1, 1, 1, 1, 1, 97, 1

(列表;图表;参考;听;历史;文本;内部格式)

抵消

1, 2

链接

n=1..97时的n，a（n）表。

A.诺维基，强可除性与LCM序列，arXiv:1310.2416[math.NT]，2013年。

A.诺维基，强可除性与LCM序列，美国数学。Mnthly 122（2015），958-966。

配方奶粉

发件人安德烈·扎博洛茨基2020年4月11日：（开始）

a（n）=A051543号（n-1）对于n>1。

a（n）=A014963号（n+1）对于n>1。（完）

MAPLE公司

LCMXfm:=程序（a）局部L，i，n，g，b；

五十： =nops（a）；

g： =数组（1..L，0）；b:=数组（1..L，0）；

b[1]：=a[1]；g[1]：=a[1]；

对于从2到L的n do g[n]：=ilcm（g[n-1]，a[n]）；b[n]：=g[n]/g[n-1]；od；

L打印（[seq（b[i]，i=1..L）]）；

结束；

t1:=[序列（n*（n+1）/2，n=1..100）]；

LCMXfm（t1）；

数学

LCMXfm[a_List]：=模块[｛L=长度[a]，b，g}，b[1]=g[1]=a[[1]；b[_]=0；g[_]=0；Do[g[n]=LCM[g[n-1]，a[[n]]]；b[n]=g[n]/g[n-1]，{n，2，L}]；数组[b，L]]；

LCMXfm[表[n*（n+1）/2，{n，1，100}]](*Jean-François Alcover公司，2017年12月5日，枫叶出版社*）

交叉参考

囊性纤维变性。A051543号,A020500型,A014963号.

上下文中的序列：A113260型 A378888飞机 A051543号*A129538号 A076934号 A111701型

相邻序列：A265571型 A265572型 A265573型*A265575型 165576英镑 A265577型

关键词

非n

作者

N.J.A.斯隆2016年1月2日

状态

经核准的