%I#25 2020年7月21日02:30:05
%S 10,11,42,52,57203272497号
%N个数N,使得3^N-2^N不是平方自由的,但3^d-2^d对N的所有真除数d都是平方自由的。
%C A280149的基本成员:不是任何早期项的倍数的A280142成员。
%C 547≤a(9)≤689。689、732、776、903、1055、1081、1332、2525、2628是术语_柴瓦武,2020年7月20日
%e10在这个序列中是因为所有3^1-2^1=1,3^2-2^2=5,3^5-2^5=211都是无平方的,3^10-2^10=58025=5^2*2321不是无平方的。
%t函数[s,DeleteCase[#,0]&@MapIndexed[#1 Boole[Total@Boole@Map[Function[k,Divisible[#1,k]],Take[s,First@#2-1]]==0]&,s]]@Select[Range@60,!SquareFreeQ[3^#-2^#]&](*Michael De Vlieger_,2016年12月30日*)
%o(PARI)是(n)=div(n,d,如果(!issquarefere(3^d-2^d),return(d==n));2018年3月1日,查尔斯·格里特豪斯四世
%Y参考A001047,A280149。
%Y参考数字n,使得(k+1)^n-k^n不是平方自由的,但(k+1”)^d-k^d对于n的每个适当除数d是平方自由的:A237043(k=1),这个序列(k=2),A280208(k=3),A2 80209(k=4)。
%K nonn,更多
%O 1,1号机组
%A _Juri-Stepan Gerasimov和_Charles R Greathouse IV,2016年12月28日
|