|
%I #18 Mar 23 2023 03:18:59
%S 1,2,8,6402
%N Numbers k such that prime(1)^1 + prime(2)^2 + ... + prime(k)^k is prime.
%C The number corresponding to k=6402 is a probable prime. There is no further term up to 9435.
%C There is no further term up to 12600. - _Michael S. Branicky_, Mar 22 2023
%e prime(1)^1 + prime(2)^2 + ... + prime(8)^8 = 17398892111 is prime, so 8 is in the sequence.
%t Select[Range[1, 100], PrimeQ[Sum[Prime[i]^i, {i, 1, #}]] &] (* _Julien Kluge_, Dec 03 2016 *)
%Y Cf. A087480.
%K hard,more,nonn
%O 1,2
%A _Farideh Firoozbakht_, Jun 27 2010
|
