A072749-编号：A072749-OEIS

搜索： a072749-编号：a072799

显示找到的4个结果中的1-4个。

第页1

排序：关联|参考文献|数|被改进的|创建格式：长的|短的|数据

A072747美元

前n个无平方数中的计数因子2。

+10
5

0、1、1、1、2、3、3、3、4、4、4、4、4、5、5、6、7、7、8、8、9、9、10、11、11、11、11、12、13、13、14、14、14、15、15、16、16、17、17、18、18、18、19、19、19、20、20、20、21、21、22、22、23、23、24、25、25，26，26，26 (列表;图表;参考文献;听;历史;文本;内部格式)

	抵消	`1,5`
	链接	`Gheorghe Coserea，n=1..10000时的n，a（n）表`
	配方奶粉	`a（n）~n/3-阿米拉姆·埃尔达尔2021年2月24日`
	例子	`前10个无平方数是：1，2，3，5，6=23，7，10=25，11，13和14=2*7：2，6，10和14可以被2整除，因此a（10）=4。`
	数学	`累加[If[Divisible[#，2]，1，0]和/@选择[Range[100]，SquareFreeQ]](文森佐·利班迪2015年8月23日）`
	黄体脂酮素	`（PARI）` `n=77；k=0；bag=列表（）；a=矢量（n）；` `直到（n==0，k++；如果（issquarefree（k），listput（bag，k））；n——）；` `对于（i=2，#bag，a[i]=a[i-1]+（bag[i]%2==0）；打印（a）\\Gheorghe Coserea公司2015年8月22日`
	交叉参考	`囊性纤维变性。A005117号,A072748号,A072749号,A072750型,A072751号.`
	关键字	`非n`
	作者	`莱因哈德·祖姆凯勒，2002年7月8日`
	扩展	`姓名澄清人Gheorghe Coserea公司2015年8月22日`
	状态	`经核准的`

A072748号

前n个无平方数中的计数因子3。

+10
5

0, 0, 1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 3, 4, 4, 4, 4, 4, 5, 5, 6, 6, 6, 6, 6, 7, 7, 8, 8, 8, 8, 9, 9, 9, 10, 10, 10, 10, 10, 10, 11, 11, 12, 12, 12, 12, 12, 12, 13, 13, 13, 13, 13, 13, 14, 14, 14, 15, 15, 15, 15, 15, 16, 16, 17, 17, 17, 17, 17, 18, 18, 19, 19, 19, 19, 19, 20, 20, 21, 21 (列表;图表;参考文献;听;历史;文本;内部格式)

	抵消	`1,5`
	链接	`Gheorghe Coserea，n=1..10000时的n，a（n）表`
	配方奶粉	`a（n）~n/4-阿米拉姆·埃尔达尔2021年2月24日`
	例子	`前10个无平方数是：1，2，3，5，6=23，7，10=25，11，13和14=2*7：3和6可以被3整除，因此a（10）=2。`
	数学	`累加[If[Divisible[#，3]，1，0]和/@Select[Range[100]，SquareFreeQ]](文森佐·利班迪2015年8月23日）`
	黄体脂酮素	`（PARI）` `n=80；k=0；bag=列表（）；a=矢量（n）；` `直到（n==0，k++；如果（issquarefree（k），listput（bag，k））；n——）；` `对于（i=2，#bag，a[i]=a[i-1]+（bag[i]%3==0）；` `打印（a）\\Gheorghe Coserea公司2015年8月22日`
	交叉参考	`囊性纤维变性。A005117号,A072747美元,A072749号,A072750型,A072751号.`
	关键字	`非n`
	作者	`莱因哈德·祖姆凯勒，2002年7月8日`
	扩展	`姓名澄清人Gheorghe Coserea公司2015年8月22日`
	状态	`经核准的`

A072750型

前n个无平方数中的计数因子7。

+10
5

0, 0, 0, 0, 0, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 7, 7, 8, 8, 8, 8, 8, 8, 8, 8, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 10, 10, 10, 10, 10, 10, 10, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 12 (列表;图表;参考文献;听;历史;文本;内部格式)

	抵消	`1,10`
	链接	`莱因哈德·祖姆凯勒（Reinhard Zumkeller），n=1..10000时的n，a（n）表`
	配方奶粉	`a（n）-a（n-1）=1如果A005117号（n）在中A008589号，否则为0-罗伯特·伊斯雷尔2015年8月23日` `a（n）~n/8-阿米拉姆·埃尔达尔2021年2月24日`
	例子	`前10个无平方数是：1，2，3，5，6=23，7，10=25，11，13和14=2*7：7和14可以被7整除，因此a（10）=2。`
	MAPLE公司	`N： =1000:#使用无平方数<=N` `M： =映射（proc（t）如果numtheory：-issqrfree（t），则如果t mod 7=0，则1 else 0 fi fi结束proc，[$1.N]）：` `列表工具：-部分和（M）#罗伯特·伊斯雷尔2015年8月23日`
	数学	`使用[{sf=Select[Range[200]，SquareFreeQ]}，Accumulate[If[Divisible[#，7]，1，0]&/@sf]](哈维·P·戴尔2013年3月21日）`
	黄体脂酮素	`（哈斯克尔）` `a072750 n=a072750_列表！！（n-1）` a072750_list=scanl1（+）$map（（0^）。（`mod`7））005117_list `--莱因哈德·祖姆凯勒2013年3月25日` `（PARI）` `n=94；k=0；bag=列表（）；a=矢量（n）；` `直到（n==0，k++；如果（issquarefree（k），listput（bag，k））；n——）；` `对于（i=2，#bag，a[i]=a[i-1]+（bag[i]%7==0）；` `打印（a）\\Gheorghe Coserea公司2015年8月23日`
	交叉参考	`囊性纤维变性。A005117号,A008589号,A072747美元,A072748号,A072749号,A072751号.`
	关键字	`非n`
	作者	`莱因哈德·祖姆凯勒，2002年7月8日`
	扩展	`姓名澄清人Gheorghe Coserea公司2015年8月23日`
	状态	`经核准的`

A072751号

无平方数最常见素因子的最大值<=n；a（1）=1。

+10
4

1, 2, 3, 5, 3, 3, 2, 2, 2, 2, 2, 2, 2, 3, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2 (列表;图表;参考文献;听;历史;文本;内部格式)

	抵消	`1,2`
	评论	`当n>14时，a（n）=2。`
	链接	`n=1..105时的n、a（n）表。`
	数学	`最大值=200；primeFactors=FactorInteger[#][[All，1]]&/@Select[Range[max]，SquareFreeQ]；a[n_]：=排序[Take[primeFactors，n]//Flatten]，其中[#1[[2]]>#2[[2]]，True，#1[2]]==#2[[2]，#1[[1]>#2[1]]，True，False]&][1，1]]；表[a[n]，{n，1，primeFactors//Length}](Jean-François Alcover公司2013年10月14日）`
	交叉参考	`囊性纤维变性。A005117号,A072747美元,A072748美元,A072749号,A072750型.`
	关键字	`非n,美好的`
	作者	`莱因哈德·祖姆凯勒，2002年7月8日`
	状态	`经核准的`

第页1

搜索在0.006秒内完成