2. Using a list comprehension, find the sum of all numbers from 1 to n that are odd multiples of 3 and 7.

3

The eight divisors of 24 are 1, 2, 3, 4, 6, 8, 12 and 24. The ten numbers not exceeding 100 having exactly eight divisors are 24, 30, 40, 42, 54, 56, 66, 70, 78 and 88. Let f(n) be the count of numbers not exceeding n with exactly eight divisors. You are given f(100) = 10 and f(1000) = 180. Find f(104)

In Haskell