|
|
A276564
|
|
Perfect powers k (exponent greater than 1) such that k-1 and k+1 are both semiprime.
|
|
2
|
|
|
144, 216, 900, 1764, 2048, 3600, 10404, 11664, 39204, 97344, 213444, 248832, 272484, 360000, 656100, 685584, 1040400, 1102500, 1127844, 1633284, 2108304, 2214144, 3504384, 3802500, 4112784, 4536900, 4588164, 5475600, 7784100, 7851204, 8388608, 8820900, 9000000, 9734400
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
2048 = 2^11, and both 2047 = 23*89 and 2049 = 3*683 are semiprimes.
|
|
MATHEMATICA
|
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 *)
|
|
PROG
|
(PARI) for(i=2, 10^7, if(ispower(i)&&bigomega(i-1)==2&&bigomega(i+1)==2, print1(i, ", ")))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|