A115421 Numbers having a 1 in position 5 of their binary expansion.
32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124
Offset: 1
Examples
a(1) = 32 = 100000 in binary.
Links
- Robert Israel, Table of n, a(n) for n = 1..10000
- Edd Mann, Mystery Calculator.
Programs
-
Maple
a:= n-> n+31 + 32*iquo(n-1, 32): seq(a(n), n=1..100); # Alois P. Heinz, Aug 22 2011
-
Mathematica
Select[Range[256], BitAnd[#, 32] == 32 &] (* Alonso del Arte, Nov 14 2016 *)
-
Python
def A115421(n): return ((n-1<<1)&-31|32)+(n-1&31) # Chai Wah Wu, Mar 28 2024
Formula
From Robert Israel, Nov 14 2016: (Start)
a(n + 32) = a(n) + 64.
O.g.f.: (31 + (1 - x^33)/(1 - x))*x/((1 - x)*(1 - x^32)). (End)
Comments