搜索: a072750-编号:a072750
|
|
|
|
0, 1, 1, 1, 2, 2, 3, 3, 3, 4, 4, 4, 4, 4, 5, 5, 6, 6, 7, 7, 7, 8, 8, 8, 9, 9, 9, 10, 10, 11, 11, 11, 11, 11, 11, 12, 12, 12, 13, 13, 14, 14, 14, 15, 15, 15, 16, 16, 17, 17, 18, 18, 18, 19, 19, 19, 19, 19, 20, 20, 20, 20, 21, 21, 21, 22, 22, 22, 23, 23, 23, 24, 24, 25, 25, 26, 26, 26
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,5
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
前10个无平方数是:1,2,3,5,6=2*3,7,10=2*5,11,13和14=2*7:2,6,10和14可以被2整除,因此a(10)=4。
|
|
数学
|
累加[If[Divisible[#,2],1,0]和/@Select[Range[100],SquareFreeQ]](*文森佐·利班迪2015年8月23日*)
|
|
黄体脂酮素
|
(PARI)
n=77;k=0;bag=列表();a=矢量(n);
直到(n==0,k++;如果(issquarefree(k),listput(bag,k));n——);
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
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
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
前10个无平方数是:1,2,3,5,6=2*3,7,10=2*5,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);
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
0, 0, 0, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 8, 8, 8, 8, 8, 8, 8, 8, 8, 9, 9, 9, 9, 9, 9, 9, 10, 10, 10, 10, 10, 11, 11, 11, 11, 12, 12, 12, 12, 13, 13, 13, 13, 13, 13, 13, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,7个
|
|
链接
|
|
|
配方奶粉
|
|
|
例子
|
前10个无平方数是:1,2,3,5,6=2*3,7,10=2*5,11,13和14=2*7:5和10可以被5整除,因此a(10)=2。
|
|
数学
|
累加[If[Divisible[#,5],1,0]和/@Select[Range[150],SquareFreeQ]](*哈维·P·戴尔2013年10月17日*)
|
|
黄体脂酮素
|
(PARI)
n=89;k=0;bag=列表();a=矢量(n);
直到(n==0,k++;如果(issquarefree(k),listput(bag,k));n——);
对于(i=2,#bag,a[i]=a[i-1]+(bag[i]%5==0);
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
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。
|
|
链接
|
|
|
数学
|
最大值=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日*)
|
|
交叉参考
|
|
|
关键词
|
非n,美好的
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.008秒内完成
|