function Sinogram = SinoImg(image,theta)

%setting up number of projections each 
AngProj  = length(theta);
ParaProj = size(image,1);
Sinogram = zeros(ParaProj,AngProj);

for i = 1:length(theta)
   %img rotation
   tImg= imrotate(image,-theta(i),'bilinear','crop');
   % sinogram construction
   Sinogram(:,i) = sum(tImg,2);
   imagesc(Sinogram);
   drawnow
end
