dicomrt_makevertical.m 248 B

123456789101112
  1. function [Vout] = dicomrt_makevertical(Vin)
  2. % dicomrt_makevertical(Vin)
  3. %
  4. % Returns a vector in vertical form.
  5. %
  6. % Copyright (C) 2002 Emiliano Spezi (emiliano.spezi@physics.org)
  7. if size(Vin,1)<size(Vin,2)
  8. Vin=Vin';
  9. end
  10. Vout=Vin;