OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
FORMULA
Exponents in expansion of (Sum_{i>=1} x^prime(i)) * (Sum_{j>=1} x^(j^3)).
MAPLE
N:= 200: # for terms <= N
P:= select(isprime, [2, seq(i, i=3..N-1, 2)]):
C:= [seq(j^3, j=1..floor((N-2)^(1/3)))]:
sort(convert(select(`<=`, {seq(seq(p+c, p=P), c=C)}, N), list)); # Robert Israel, Apr 22 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Apr 19 2019
STATUS
approved