function matriz = transf_vetor_em_matriz(nx,ny,vetor)

%Transformando o vetor s (1,nx*ny) em uma matriz (ny,nx)
matriz = zeros(ny,nx);
% disp('valor de nx e ny')
% nx
% ny
p = 1;
q = ny;
for k = 1:nx    
    matriz(1:ny,k) = vetor(p:q);
    p = p + ny;
    q = q + ny;
end