|
%I #11 Jul 23 2021 11:28:32
%S 17,54,368,2530,178478,1596520,129145076,1162268326,94143190994,
%T 68630377389272,617673396313738,450283905891048016,
%U 36472996377170855324,328256967394537157134,26588814358957503391610
%N Numbers of the form p^3 + 3^p for p prime.
%e For example, the first two terms are 2^3 + 3^2 = 17, 3^3 + 3^3 = 54.
%t Table[Prime[n]^3 + 3^Prime[n], {n, 16}] (* _Robert G. Wilson v_, Sep 15 2004 *)
%t #^3+3^#&/@Prime[Range[20]] (* _Harvey P. Dale_, Jul 23 2021 *)
%o (PARI) forprime(p=2,47,print1(p^3+3^p,",")) \\ _Klaus Brockhaus_
%K nonn,easy
%O 1,1
%A _Parthasarathy Nambi_, Sep 15 2004
%E More terms from _Klaus Brockhaus_, _Ray Chandler_ and _Robert G. Wilson v_, Sep 15 2004
|
