n = gets.to_i

res = []
(1..Math.sqrt(n).to_i).each do |x|
  (1..Math.sqrt(n).to_i).each do |y|
    (1..Math.sqrt(n).to_i).each do |z|
      cal = (x**x) + (y**y) + (z**z) + (x * y) + (y * z) + (z * x)
      res << cal if cal <= n
    end
  end
end

(1..n).each do |i|
  puts res.count(i)
end
