|
%I #18 Jul 01 2024 02:41:29
%S 7,19,131,719,17863,84017,1742537,7754077,148948139,11891268401,
%T 50685770167,3839726846311,67756520645329,283634652716357,
%U 4940729268330643,354733509412061993,25161232392544176197,103917116257220706127,7278050150447936843717,123129946710886829498713,505870764273226657981427
%N a(n) = prime(2^prime(n)).
%F a(n) = A033844(A000040(n)). - _Amiram Eldar_, Jul 01 2024
%e a(3) = prime(2^prime(3)) = prime(2^5) = prime(32) = 131.
%t Table[ Prime[ 2^Prime[n]], {n, 13}] (* _Robert G. Wilson v_, Aug 07 2004 *)
%o (PARI) lista(n) = forprime(x=2,n,print1(prime(2^x)","));
%Y Cf. A000040, A033844.
%K nonn
%O 1,1
%A _Cino Hilliard_, Aug 02 2004
%E Edited and extended by _Robert G. Wilson v_, Aug 07 2004
%E a(14)-a(21) from _Amiram Eldar_, Jul 01 2024
|
