Сколько среди чисел от 5232 до 6288 (включительно) таких чисел, для которых выполняются одновременно два свойства: они простые их сумма цифр четна

[5261, 5281, 5333, 5351, 5393, 5399, 5407, 5441, 5443, 5449, 5483, 5519, 5531, 5557, 5573, 5591, 5623, 5641, 5647, 5669, 5683, 5689, 5711, 5717, 5737, 5779, 5791, 5801, 5807, 5821, 5827, 5843, 5849, 5861, 5867, 5869, 5881, 5939, 5953, 6011, 6037, 6053, 6073, 6079, 6091, 6101, 6121, 6143, 6163, 6211, 6217, 6257, 6271, 6277]
54

#Код программы на Ruby22
t=[]
primes = NumberHelpers::getPrimeNumbers(6288, nil)
primes.each do |pr|
    t << pr if pr >= 5232 and NumberHelpers::GetNumbersSum(pr) % 2 == 0
end
p t
p t.size

def getPrimeNumbers(max, primes)
        primes = [2] if primes == nil

        for i in (primes.last+1)..max
            f = false
            primes.each do |pn|
                f = (f or (i % pn==0))
            end
            primes<<i if not f
        end
        p primes.last
        return primes
    end

def GetNumbersSum(n)
        n = n.to_s.chars
        sum = 0
        n.each do |c|
            sum += c.to_i()
        end

        return sum
    end