
%Bruk prosenttegn til aa utelate deler av teksten her.  
%Dere kan og gjore en utregning usynlig ved aa sette semikolon etter den.

A=[0,1;1,0] %  Vi derfinerer en matrise.
b= [3;4]  % og en soylevektor

disp('Produkter Ab er:')
A*b

disp('Determinanten til A er:')
det(A)

disp('eigenvektoren og eigenverdiene til A er:')
eig(A)
[P,D] = eig(A)


disp('Vi lager til en 4x4 matrise med alle elementer lik 0')
M= zeros(4)  
 for i=1:4
    for j=1:4
        M(i,j) = (-1)^(i+j) / ( i+   j)    ;
    end 
 end

disp('Her er M etter at den er redefinert')
M
 
disp('Determinanten til M er:')
det(M)

disp('eigenvektoren og eigenverdiene til M er:')
eig(M)
[P,D] = eig(M)

disp('Inversmatrisen til M er:')
inv(M)

disp('Vi lager en radvektor og transponerer denne')
c= [ 2,3,5,1,]
d= c.'


disp('Losningen til likningsystemet M x = d er:')
inv(M) * d   %Alternativt kan dere bruke $ A\d


disp('En tilfeldig 4x4 matrise med elementer mellom 0 og 1')
K=rand(4)

disp('Eksponentfunksjonen anvendt paa K gir:')
expm(K)
%I oppgave 8 skal dere ogsaa regne ut for hand.  


