OFFSET
0,2
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..700
FORMULA
a(n) mod 2 = 1 - (n mod 2) = A059841(n).
a(n) ~ c * d^n, where d = 2.798648023933224047287803536948757710187420348758496337690531870498937575... and c = 0.639525188357518889842205998775477309094300590250850025271938769053628196... - Vaclav Kotesovec, Jan 13 2024
MAPLE
b:= proc(n, k) option remember; `if`(min(n, k)=0, 1, add(add(
`if`(igcd(i, j)=1, b(n-i, k-j), 0), j=0..k), i=0..n))
end:
a:= n-> add(b(k, n-k), k=0..n):
seq(a(n), n=0..29);
CROSSREFS
KEYWORD
nonn
AUTHOR
Alois P. Heinz, Jan 02 2024
STATUS
approved