cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A276564 Perfect powers k (exponent greater than 1) such that k-1 and k+1 are both semiprime.

This page as a plain text file.
%I A276564 #25 May 05 2022 08:05:12
%S A276564 144,216,900,1764,2048,3600,10404,11664,39204,97344,213444,248832,
%T A276564 272484,360000,656100,685584,1040400,1102500,1127844,1633284,2108304,
%U A276564 2214144,3504384,3802500,4112784,4536900,4588164,5475600,7784100,7851204,8388608,8820900,9000000,9734400
%N A276564 Perfect powers k (exponent greater than 1) such that k-1 and k+1 are both semiprime.
%C A276564 Intersection of A001597 and A124936. - _Michel Marcus_, Dec 03 2016
%H A276564 Amiram Eldar, <a href="/A276564/b276564.txt">Table of n, a(n) for n = 1..10000</a>
%e A276564 2048 = 2^11, and both 2047 = 23*89 and 2049 = 3*683 are semiprimes.
%t A276564 Select[Range[10^7], And[GCD @@ FactorInteger[#][[All, 2]] > 1, Union@ # == {2} &@ Map[PrimeOmega, {# - 1, # + 1}]] &] (* _Michael De Vlieger_, Dec 07 2016, after _Ant King_ at A001597 *)
%o A276564 (PARI) for(i=2,10^7,if(ispower(i)&&bigomega(i-1)==2&&bigomega(i+1)==2,print1(i,", ")))
%Y A276564 Cf. A001358, A001597, A108278, A121898, A124936, A167023, A268043, A276565.
%K A276564 nonn
%O A276564 1,1
%A A276564 _Antonio Roldán_, Nov 16 2016