%I #15 Jul 05 2022 11:15:59
%S 2,7,22,75,298,1409,7900,52021,397756,3468667,33656220,354326769,
%T 3970080798,46804154165,577838630958,7468797926219,101264140457250,
%U 1443524097355225,21670184170964846,342875871451985761
%N a(n) = prime(n)^1 + prime(n-1)^2 + prime(n-2)^3 + ... + prime(1)^n.
%H Robert Israel, <a href="/A090831/b090831.txt">Table of n, a(n) for n = 1..460</a>
%e a(5) = 11^1 + 7^2 + 5^3 + 3^4 + 2^5 = 11 + 49 + 125 + 81 + 32 = 298.
%p seq(add(ithprime(i)^(n-i+1),i=1..n),n=1..30); # _Robert Israel_, Mar 23 2021
%t f[n_] := Sum[ Prime[i]^(n - i + 1), {i, n}]; Table[ f[n], {n, 1, 20}] (* _Robert G. Wilson v_, Feb 18 2004 *)
%Y Cf. A000040.
%K easy,nonn
%O 1,1
%A _Felix Tubiana_, Feb 16 2004
%E More terms from _Ray Chandler_ and _Robert G. Wilson v_, Feb 18 2004