%I#70 2024年4月16日01:39:57
%电话:8288675980012167235224332928465124182520011309768384199200,
%电话:592192224493169107554250694471305146304822132261600,
%电话:44336554448865363200008192480787000119686839348313325427460800150613770482028821995554247
%N数k,这样k和k+1就是强大的数。
%C“Erdős在1975年推测不存在三个连续的强大整数。”
%请参阅盖伊关于厄德的猜想和关于这个序列是无限的陈述_Jud McCranie_,2002年10月13日
%很容易看出这个序列是无限的:如果k在序列中,那么4*k*(k+1)也是无限的_富兰克林·亚当斯·沃特斯,2009年9月16日
%C连续三个强大数字(推测为空)的第一个就是这个序列中的数字和A076445。-_Charles R Greathouse IV,2012年11月16日
%C Jaroslaw Wroblewski(参见Prime Puzzles链接)表明,在这个序列中有无穷多的k项,因此k和k+1都不是正方形_Charles R Greathouse IV,2012年11月19日
%C Paul Erdős在谈到与Kurt Mahler的会面时写道:“我几乎立即向他提出了以下问题:……是否存在无穷多个连续的强大数字?Mahler立即回答:微不足道,是的!x^2-8y^2=1有无穷多个解决方案。我有点沮丧,因为我觉得我应该自己考虑这一点。”-Jonathan Sondow,2015年2月8日
%D J.-M.De Konink,《法定法西斯主义》,第288条,第74页,《椭圆》,巴黎,2008年。
%D R.K.Guy,《数论中未解决的问题》,B16。
%H Donovan Johnson,<a href=“/A0060355/b060355.txt”>n,a(n)表,n=1..39</a>(术语<10^22)
%H C.K.Caldwell,<a href=“https://t5k.org/glossary/page.php?sort=PowerfulNumber(强大数字)“>强大的数字</a>。
%H P.Erdős,<a href=“网址:http://www.renyi.hu/~p_erdos/1989-34.pdf“>对库尔特·马勒的一些个人和数学回忆</a>,《澳大利亚数学与社会杂志》,16(1)(1989),1-2。
%H Jéróme Germoni,<a href=“http://images.math.cnrs.fr/Nombres-puissants-au-bac-S.html“>Nombres puissants au bac S,数学图像,CNRS,2018年(法语)。
%H J.J.O’Connor和E.F.Robertson,<a href=“http://www-history.mcs.st-and.ac.uk/传记/Mahler.html“>库尔特·马勒传记。
%H Carlos Rivera,<a href=“http://www.primepuzzles.net/problems/prob_053.htm“>问题53。重温了强大的数字</a>,The Prime Puzzles&Problems Connection。
%H Eric Weistein的《数学世界》,<a href=“http://mathworld.wolfram.com/PowerfulNumber.html“>强大的数字。
%e 1825200属于这个序列,因为1825200=2^4*3^3*5^2*13^2和1825201=7^2*193^2=1351^2都是强大的数字_Labos Elemer,2001年5月3日
%t f[n_]:=第一个[Union[Last/@FactorInteger[n]]];选择[范围[2000000],f[#]>1&&f[#+1]>1&](*_Vladimir Joseph Stephan Orlovsky_,2012年1月29日*)
%t序列位置[Table[If[Min[FactorInteger[n][[;;,2]]>1,1,0],{n,11310000}],{1,1}][[;,1]](*程序生成序列的前10项。*)(*Harvey P.Dale_,2024年3月27日*)
%o(PARI)is(n)=ispowerful(n)&&ispowerful(n+1)\\_Charles R Greathouse IV_,2012年11月16日
%o(哈斯克尔)
%o a060355 n=a060355_列表!!(n-1)
%o a060355_list=映射a001694$过滤器((==1)。a076446)[1..]
%o--_Reinhard Zumkeller_,2015年6月3日,2012年11月30日
%o(鼠尾草)
%o定义A060355(n):
%o a=斯隆。A001694号
%o返回a.is_powerful(n)和a.is_pPowerful(n+1)
%o[n表示n in(1..33333)if A060355(n)]#_Peter Luschny_,2015年2月8日
%Y图元在A199801中。
%Y参考A001694、A060859。
%Y参考A076446(A001694的第一个差异)。
%K nonn公司
%O 1,1号机组
%A _Jason Earls,2001年4月1日
%E修正和扩展人:Jud McCranie,2001年7月8日
%E更多来自Jud McCranie的条款,2002年10月13日
%E a(22)-a(23),来自Donovan Johnson,2011年7月29日
|