Uppgift 5.4: 32 (Exponentialmatrisen direkt) 

restart; -1; with(LinearAlgebra); -1 

`:=`(P, Matrix(%id = 22276992)); -1 

Matrix(%id = 5054152) (5.1)
 

Maple kan förstÃ¥s ocksÃ¥ beräkna exponentialmatrisen direkt. 

`:=`(X, MatrixExponential(`*`(t, `*`(P)))) 

Matrix(%id = 21827068) (5.2)
 

`:=`(b, Vector[column](%id = 7253792)) 

Vector[column](%id = 5027696) (5.3)
 

`:=`(x, Typesetting:-delayDotProduct(X, b)) 

Vector[column](%id = 7682516)
Vector[column](%id = 7682516)
Vector[column](%id = 7682516)
Vector[column](%id = 7682516)
Vector[column](%id = 7682516)
Vector[column](%id = 7682516)
Vector[column](%id = 7682516)		 (5.4)
 

`:=`(b, Vector[column](%id = 7361780)) 

Vector[column](%id = 6909560) (5.5)
 

plot(Typesetting:-delayDotProduct(X, b), t = 0 .. `/`(1, 10), thickness = 2) 

Plot_2d