MOD = 10**9 + 7

N, K = gets.split.map{ |x| x.to_i }

len_x_count = []

p = Math.sqrt(N).floor

pairs = []
(1..p).each{ |x|
	pairs << [x, N/x]
}

$keys = pairs.flatten.sort.uniq

$multis = $keys.map.with_index{ |k, i| i >= 1 ? k - $keys[i - 1]: 1}

(1..K).each{ |len|
	len_x_count[len] = []

	if len == 1 then
		len_x_count[len] = Array.new($keys.size, 1)
	else
		add = 0
		(0 ... $keys.size).each{ |i|
			len_x_count[len].unshift(
				(len_x_count[len - 1][i] * $multis[i] + add) % MOD
			)

			add = len_x_count[len][0]
		}
	end
}

result = 0

(0 ... $keys.size).each{ |i|
	result += len_x_count[-1][i] * $multis[i]
}

puts result % MOD
