A174909-OEIS公司

A174909号

三角形T（n，i），其第n行给出任何素数（n）中的数字数，#连续数字的最小素数因子为素数（n-i+1）。

1, 1, 3, 2, 5, 15, 8, 14, 35, 105, 48, 88, 154, 385, 1155, 480, 624, 1144, 2002, 5005, 15015, 5760, 8160, 10608, 19448, 34034, 85085, 255255, 92160, 109440, 155040, 201552, 369512, 646646, 1616615, 4849845, 1658880, 2119680, 2517120, 3565920 (列表;桌子;图表;参考;听;历史;文本;内部格式)

	抵消	`1,3`
	评论	`这里的素数（n）#表示前n个素数的乘积。第n行以开头A005867号（n-1）。第n行中的其他n-1项是前一行的素数（n）倍。第n行中的项之和是余弦（素数（n）#），即A053144号（n），并且哪个等于素数（n）#-A005867号（n） ●●●●。此序列是中注释的泛化A005867号丹尼斯·马丁。`
	链接	`n=1..40时的n，a（n）表。`
	例子	`对于n=3，我们有素数（n）=5，235=30个连续数的任何范围有2个最小素数因子为5的数字，5个最小素素因子为3的数字，以及15个最小素因子为2的数字。` `发件人鲍勃·塞尔科2017年10月12日：（开始）` `三角形开始：` `不适用1 2 3 4 5 6` `1 1` `2 1 3` `3 2 5 15` `4 8 14 35 105` `5 48 88 154 385 1155` `6 480 624 1144 2002 5005 15015` `（结束）`
	数学	`t＝｛｛1｝｝；q=2；Do[p=素数[n]；t=AppendTo[t，连接[{（q-1）t[[-1，1]]}，pt[-1]]]；q=p，{n，2，9}]；压扁[t]` `（第二个节目：）` `块[{nn=8，s}，s=Array[FactorInteger[#][[1，1]]&，乘积[素数@i，{i，nn}]]；表[With[{P=Product[Prime@k，{k，n}]}，Count[Take[s，P]，_？（#==素数[n-i+1]&）]]，{n，nn}，{i，n}]](迈克尔·德弗利格2017年10月14日）`
	交叉参考	`囊性纤维变性。A002110号,A005867号（第一列），A020639号,A053144号,A070826级（主对角线）。` `囊性纤维变性。A293558型（转置）。` `上下文中的序列：A137455号 A111273号 A068553号A187943号 A301493型 A214502型` `相邻序列：174006年 A174907号 A174908号A174910号 A174911号 A174912号`
	关键词	`非n,表`
	作者	`T.D.诺伊2010年4月1日`
	状态	`经核准的`