A185596 Complement of A185595.

2, 3, 5, 7, 8, 10, 11, 13, 14, 15, 17, 18, 19, 21, 22, 23, 25, 26, 27, 29, 30, 31, 32, 34, 35, 36, 37, 39, 40, 41, 42, 44, 45, 46, 47, 48, 50, 51, 52, 53, 54, 56, 57, 58, 59, 61, 62, 63, 64, 65, 67, 68, 69, 70, 71, 73, 74, 75

Offset

1,1

Links

G. C. Greubel, Table of n, a(n) for n = 1..5000

Mathematica

f[n_]=Floor[n^(3/2)]-Floor[n^(1/2)];
Table[f[n], {n, 1, 80}]  (* A185595 *)
t2=Complement[Range[150], Table[f[n], {n, 1, 80}]]; t2  (* A185596 *)

Crossrefs

Cf. A185595.

Sequence in context: A156247 A232532 A076798 * A298863 A184588 A047488

Adjacent sequences: A185593 A185594 A185595 * A185597 A185598 A185599

Keyword

nonn,easy

Author

Clark Kimberling, Jan 31 2011

Status

approved