OFFSET
1,1
LINKS
Jean-François Alcover, Table of n, a(n) for n = 1..1000
EXAMPLE
a(1) = 8 = 2^2 + 2 + 2.
a(2) = 13 = 2^3 + 2 + 3.
a(3) = 14 = 3^2 + 3 + 2.
a(4) = 22 = 2^4 + 2 + 4 = 4^2 + 4 + 2. - Wolfdieter Lang, Feb 03 2015
MAPLE
N:= 10000; # to get all terms <= N
select(`<=`, {seq(seq(x^y+x+y, y = 2..floor(log[x](N-x))),
x=2..floor(sqrt(N)))}, N);
# if using Maple 11 or earlier, uncomment the next line
# sort(convert(%, list)); # Robert Israel, Jan 14 2015
MATHEMATICA
M = 2000;
Select[Table[x^y + x + y, {x, 2, Floor[Sqrt[M]]}, {y, 2, Floor[Log[x, M-x]] }] // Flatten, # <= M&] // Union (* Jean-François Alcover, Feb 27 2019, after Robert Israel *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Alex Ratushnyak, Jan 12 2015
STATUS
approved