OFFSET
1,2
COMMENTS
Conjecture: a(n) is the height of the bottom region in column n of the Conant gasket in A328078.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
MATHEMATICA
a[n_] := If[OddQ[n], 1, 1 + 2^(IntegerExponent[n, 2] - 1)]; Array[a, 100] (* Amiram Eldar, Aug 30 2024 *)
PROG
(Python)
def A330569(n): return 1+(0 if n&1 else 1<<(~n & n-1).bit_length()-1) # Chai Wah Wu, Jul 01 2022
(PARI) a(n) = if(n % 2, 1, 1 + 1 << (valuation(n, 2) - 1)); \\ Amiram Eldar, Aug 30 2024
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Jan 07 2020
STATUS
approved