A079299 Not a binomial number: not of form a^k +- b^k for k >= 2.

6, 14, 22, 30, 38, 42, 46, 62, 66, 70, 78, 86, 94, 102, 110, 114, 118, 134, 138, 142, 150, 154, 158, 166, 174, 182, 186, 190, 198, 206, 210, 214, 222, 230, 238, 246, 254, 258, 262, 266, 270, 278, 282, 286, 294, 302, 310, 318, 322, 326, 330, 334, 350, 354, 358

Offset

1,1

Links

Robert Israel, Table of n, a(n) for n = 1..3614

Maple

N:= 1000: # to get all terms <= N
kmax:= floor(LambertW(2*ln(2)*N)/ln(2)):
S:= {};
for k from 2 to kmax do
  bmax:= floor((N/k)^(1/(k-1)));
  S:= S union select(`<=`, {seq(seq(b^k-a^k, a=0..b-1), b=1..bmax), seq(seq(b^k+a^k, a=0..b), b=1..floor(N^(1/k)))}, N);
od:
sort(convert({$1..N} minus S, list)); # Robert Israel, Jan 03 2019

Crossrefs

Complement of A079298.

Sequence in context: A197127 A197171 A062316 * A043445 A189785 A017137

Adjacent sequences: A079296 A079297 A079298 * A079300 A079301 A079302

Keyword

nonn

Author

David W. Wilson, Feb 09 2003

Status

approved