Added CountFours function

Counts the number of positive integers less than n that does not
contains digit 4.