OFFSET
0,4
FORMULA
a(n) = n^h(n) - (n-1)^h(n) for n > 0, where h(n) = ceiling(n/2).
a(n) = A047969(n-1,h(n)-1) for n > 0.
EXAMPLE
a(0) = 1: ().
a(1) = 1: (a).
a(2) = 1: (b,b).
a(3) = 5: (a,c,a), (b,c,b), (c,a,c), (c,b,c), (c,c,c).
MAPLE
a:= n-> (h-> n^h-`if`(n=0, 0, (n-1)^h))(ceil(n/2)):
seq(a(n), n=0..25); # Alois P. Heinz, Nov 21 2024
MATHEMATICA
h[n_] := Ceiling[n/2]; a[n_] := n^h[n] - (n - 1)^h[n]; Join[{1}, Table[a[n], {n, 25}]] (* James C. McMahon, Nov 21 2024 *)
PROG
(PARI)
h(n) = {ceil(n/2)}
a(n) = {n^h(n)-(n-1)^h(n)}
(Python)
def A378203(n): return n**(m:=n+1>>1)-(n-1)**m if n else 1 # Chai Wah Wu, Nov 21 2024
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
John Tyler Rascoe, Nov 19 2024
STATUS
approved