OFFSET
1,2
COMMENTS
See comment at A065256.
LINKS
MAPLE
[seq(QuintalQueens1(j), j=1..125)]; QuintalQueens0 := n -> DoubleDigits(n, 5); QuintalQueens1 := n -> 1+QuintalQueens0(n-1);
DoubleDigits := proc(n, b) local i; add((b^i)*((2*floor(n/(b^i))) mod b), i=0..floor(evalf(log[b](n+1)))+1); end;
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Antti Karttunen, Oct 26 2001
STATUS
approved