|
|
A013929号 |
| 不是平方的数字。可被大于1的平方整除的数字。的补语A005117号. |
|
438
|
|
|
4, 8, 9, 12, 16, 18, 20, 24, 25, 27, 28, 32, 36, 40, 44, 45, 48, 49, 50, 52, 54, 56, 60, 63, 64, 68, 72, 75, 76, 80, 81, 84, 88, 90, 92, 96, 98, 99, 100, 104, 108, 112, 116, 117, 120, 121, 124, 125, 126, 128, 132, 135, 136, 140, 144, 147, 148, 150, 152, 153, 156, 160
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
这与数字k的序列不同A007913号(k) <φ(k)。这两个序列的值不同:420、660、780、840、1320、1560、4620、5460、7140。。。,基本上是A070237号. -蚂蚁王2005年12月16日
对k进行编号,使之和{d|k}(d/phi(d))*mu(k/d)=0-贝诺伊特·克洛伊特2002年4月28日
数k存在分为p和q两部分的划分,使得p+q=k和p*q是k的倍数-阿玛纳斯·穆尔西2003年5月30日
对k进行编号,以便有一个解0<x<k到x^2==0(mod k)-弗兰兹·弗拉贝克2005年8月13日
对k进行编号,使moebius(k)=0。
a(n)=k,使得φ(k)/k=φ(m)/m,对于某些m<k-阿图尔·贾辛斯基2008年11月5日
似乎术语是数字m,因此Product_{k=1..m}(prime(k)mod m)<>0。参见Maple代码-加里·德特利夫斯2011年12月7日
词汇学上最小的序列,这样每个词都有一个正数偶数的适当除数,而这个除数没有出现在序列中,参见A005117号. -格伦·惠特尼2015年8月30日
整数m,其中至少存在一个k<m,使得m除以k^m-理查德·福伯格2021年7月31日
考虑丢番图方程S(x,y)=(x+y)+(x-y)+;在这种情况下,如果x=K*y,则z=S(K*y、y)=K*(y+1)^2(请参见A351381型,链接并引用Perelman);例如:S(12.4)=75=a(28)。S(x,y)=a(n)的解的个数为A353282型(n) ●●●●-伯纳德·肖特2022年3月29日
对于每个正整数m,m的酉因子数=m的无平方因子数(参见A034444号);但只有在这个序列的项上,幺正除数集才不同于无平方除数集。例:20的幺正除数集是{1,4,5,20},而20的无平方除数集则是{1,2,5,10}-伯纳德·肖特2022年10月15日
|
|
参考文献
|
I.Perelman,L'Algèbre récrative,Deux nombres et quatre opeérations,《语言版本》,莫斯科,1959年,第101-102页。
是的。I.Perelman,《代数可以很有趣,两个数字和四个运算》,Mir Publishers Moscow,1979年,第131-132页。
|
|
链接
|
是的。I.佩雷尔曼,代数可以很有趣第四章,丢番图方程,两个数字和四个运算,Mir Publishers Moscow,1979年,第131-132页。
斯里尼瓦萨·拉马努扬,不规则数字,J.印度数学。Soc.5(1913)第105-106页。
|
|
配方奶粉
|
求和{n>=1}1/a(n)^s=(zeta(s)*(zeta(2*s)-1))/zeta(2*s)-恩里克·佩雷斯·埃雷罗2012年7月7日
|
|
示例
|
对于20以内的项,我们计算了素数到地板的平方(sqrt(20))=4。那些方块是4和9。对于每一个这样的正方形s,将k=1的项s*k^2放到地板上(20/s)。这会在排序和删除重复项后给出列表4、8、9、12、16、18、20-大卫·A·科内斯2017年10月25日
|
|
MAPLE公司
|
a:=n->`if`(numtheory[mobius](n)=0,n,NULL);seq(a(i),i=1..160)#彼得·卢什尼2009年5月4日
t: =n->乘积(ithprime(k),k=1..n):对于n从1到160 do(如果t(n)mod n<>0),则打印(n)fiod#加里·德特利夫斯2011年12月7日
with(NumberTheory):isQuadrateful:=n->irem(Radical(n),n)<>0:
选择(是四边形,[`$`(1..160)])#彼得·卢什尼2022年7月12日
|
|
数学
|
并集[扁平[表[n i^2,{i,2,20},{n,1,400/i^2}]]
选择[Range[2,160],(Union[Last/@FactorInteger[#]][[-1]]>1)==True&](*罗伯特·威尔逊v2005年10月11日*)
选择[范围@160, ! 方形自由Q[#]&](*罗伯特·威尔逊v2012年7月21日*)
选择[范围[200],MoebiusMu[#]==0&](*阿隆索·德尔·阿特2015年11月7日*)
|
|
黄体脂酮素
|
(PARI){a(n)=局部(m,c);如果(n<=1,4*(n==1),c=1;m=4;而(c<n,m++;如果(!issquarefere(m),c++));m)}/*迈克尔·索莫斯2005年4月29日*/
(PARI)小于等于(n)=我的(res=列表());对于素数(p=2,平方(n),对于(k=1,n\p^2,listput(res,k*p^2));列表排序(res,1);资源\\大卫·A·科内斯2017年10月25日
(岩浆)[1..1000]中的n:n |不是IsSquarefree(n)];
(哈斯克尔)
a013929 n=a013929_列表!!(n-1)
a013929_list=过滤器((==0)。a008966)[1..]
(Python)
从症状合成因子导入核心
def ok(n):返回核心(n,2)!=n个
打印(列表(过滤器(正常,范围(161)))#迈克尔·布拉尼基2021年4月8日
|
|
交叉参考
|
|
|
关键词
|
非n,容易的
|
|
作者
|
|
|
扩展
|
|
|
状态
|
已批准
|
|
|
|