function res = rkm( m,eps )

s = 0;
l = length(eps);
a = log(2)/log(3);

for ep = 1
    s = s + (2+eps(ep))^(-a-2*i*pi*m/log(3));
end;

res = s;


end

