OFFSET
1,2
PROG
(PARI) m=20; select(x -> x, direuler(p=2, 101, 1/(1-(kronecker(m, p)*(X-X^2))-X)), 1)
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
Edited and extended by Andrey Zabolotskiy, Jul 30 2020
STATUS
approved