A396236 a(n) = n^2 AND NOT n.

0, 0, 4, 8, 16, 24, 32, 48, 64, 80, 100, 112, 144, 160, 192, 224, 256, 288, 324, 360, 384, 424, 480, 512, 576, 608, 676, 704, 768, 832, 896, 960, 1024, 1088, 1156, 1224, 1296, 1368, 1408, 1488, 1600, 1680, 1732, 1808, 1936, 1984, 2112, 2176, 2304, 2368, 2500, 2568, 2688, 2760, 2880

Offset

0,3

Comments

All terms are multiples of 4.

Links

Mia Boudreau, Table of n, a(n) for n = 0..10000

Formula

a(n) = A169810(n) - A396237(n).

a(n) = A007745(n) - n. - Alois P. Heinz, May 22 2026

Maple

a:= n-> Bits[Or](n, n^2)-n:
seq(a(n), n=0..54);  # Alois P. Heinz, May 22 2026

Mathematica

a[n_] := BitAnd[n^2, BitNot[n]]; Array[a, 55, 0] (* Amiram Eldar, May 22 2026 *)

Prog

(C) unsigned long long a(unsigned long long n){return n*n & ~n ; }
(PARI) a(n) = bitand(bitneg(n), n^2); \\ Michel Marcus, May 20 2026

Crossrefs

Cf. A169810 (XOR), A007745 (OR), A213541 (AND), A396237 (A AND NOT B).

Sequence in context: A270345 A335668 A181823 * A308985 A046059 A355392

Adjacent sequences: A396233 A396234 A396235 * A396237 A396238 A396239

Keyword

nonn,base,easy

Author

Mia Boudreau, May 19 2026

Status

approved