OFFSET
0,3
LINKS
Clark Kimberling, Table of n, a(n) for n = 0..1000
FORMULA
a(n) = 2*a(n/5) if n = 0 mod 5; otherwise, a(n) = a(n-1) + 1. - Clark Kimberling, Aug 03 2012
MATHEMATICA
t = Table[FromDigits[RealDigits[n, 5], 2], {n, 0, 100}]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Aug 02 2012
STATUS
approved