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.

A107606 Perfect powers which have the form prime(n) + n for some n.

This page as a plain text file.
%I A107606 #14 Jan 28 2023 16:02:10
%S A107606 8,16,27,32,49,529,676,1000,1225,1521,1681,1764,2744,3249,4096,5929,
%T A107606 9604,10404,10609,11664,12321,19600,24336,25921,26569,27889,33856,
%U A107606 34225,34596,46656,51984,68921,71289,72361,91204,100489,101124,104976
%N A107606 Perfect powers which have the form prime(n) + n for some n.
%C A107606 Corresponding n's are in A107605.
%H A107606 Zak Seidov, <a href="/A107606/b107606.txt">Table of n, a(n) for n = 1..1000</a>
%F A107606 A107606(n) = prime[A107605(n)] + A107605(n)
%t A107606 f[n_] := Prime[n] + n; Select[f /@ Range[10^4], ! GCD @@ Last /@ FactorInteger[ # ] == 1 &] (* _Ray Chandler_, May 21 2005 *)
%t A107606 perfPQ[n_]:=GCD@@FactorInteger[n][[All,2]]>1; Select[Table[Prime[n]+n,{n,10000}],perfPQ] (* _Harvey P. Dale_, Jan 28 2023 *)
%Y A107606 Cf. A001597 (perfect powers), A107605 (associated n), A107607, A107608.
%K A107606 nonn
%O A107606 1,1
%A A107606 _Zak Seidov_, May 17 2005
%E A107606 Extended by _Ray Chandler_ and _Robert G. Wilson v_, May 21 2005