function mischmasch=kompliziert(MatrixA,MatrixB)
% function mischmasch=kompliziert(MatrixA,MatrixB)
% bekommt als Eingabeargumente zwei gleich grosse Matrizen
% und mischt aus deren Elementen eine zweizeilige Matrix.


[Arows,Acols]=size(MatrixA); % fragt die Dimensionen (Zeile, Spalte) der ersten Matrix ab
[Brows,Bcols]=size(MatrixB); % fragt die Dimensionen (Zeile, Spalte) der zweiten Matrix ab

elementnumber=Arows*Acols+Brows*Bcols; % berechnet die Gesamtzahl der Elemente in den beiden Matrizen


Avec=MatrixA(:); % hängt die Spalten der ersten Matrix zu einem langen Spaltenvektor untereinander
Bvec=MatrixB(:); % hängt die Spalten der zweiten Matrix zu einem langen Spaltenvektor untereinander


misch=zeros(1,elementnumber);   % erzeugt einen Zeilenvektor "misch" voller Nullen, dessen Länge gleich
                                % der Anzahl der Elemente in den beiden Matrizen ist
                                
misch(1:2:elementnumber-1)=Avec; % schreibt auf alle ungeraden Stellen des Vektors "misch" die
                                 % untereinander geschriebenen Elemente der ersten Matrix
misch(2:2:elementnumber)=Bvec;   % schreibt auf alle geraden Stellen des Vektors "misch" die
                                 % untereinander geschriebenen Elemente der zweiten Matrix


mischmasch=[misch(1:elementnumber/2);misch((elementnumber/2)+1:elementnumber)]; % teilt den Vektor "misch"
                                % in der Mitte und schreibt die beiden Hälften als Zeilen in eine Matrix 
