function A = racsos(n, m)
    A = zeros(n, m);
    A(2:2:end, :) = 1;
    A(:, 2:2:end) = -1;
    i = find(A == -1);
    A(i) = (1:length(i)) + 9;
end