OFFSET
0,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..5000
FORMULA
a(n) = 1 + A024450(n), for n >= 1.
a(n) = a(n-1) + prime(n)^2, with a(0) = 1, a(1) = 5. - G. C. Greubel, Jan 30 2025
MATHEMATICA
Join[{1}, Accumulate[Prime[Range[40]]^2]+1] (* Harvey P. Dale, Oct 24 2015 *)
PROG
(Magma)
[1] cat [n le 1 select 5 else Self(n-1) + NthPrime(n)^2: n in [1..80]]; // G. C. Greubel, Jan 30 2025
(Python)
def A024525(n):
if n<2: return (1, 5)[n]
else: return A024525(n-1) + nth_prime(n)**2
print([A024525(n) for n in range(81)]) # G. C. Greubel, Jan 30 2025
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
Corrected by Harvey P. Dale, Oct 24 2015
STATUS
approved