clf
set(0,'defaulttextinterpreter','latex')
F1=@(x,y,z) x.*y.*z; F2=@(x,y,z) x-y+z; F3=@(x,y,z) x.*y+z;
x=linspace(-3,3,7);y=linspace(-3,3,8);z=linspace(-3,3,8);
[X,Y,Z]=meshgrid(x,y,z);
quiver3(X,Y,Z,F1(X,Y,Z),F2(X,Y,Z),F3(X,Y,Z),2,'Color','r','LineWidth',1.5)
rotate3d on
hold on
title('$\mathbf{F}(x,y,z) = xyz \mathbf{i} +(x-y+z)\mathbf{j}+(xy+z)\mathbf{k}$','FontSize',14)
pause
[S1 S2 S3]=meshgrid(linspace(-1.5,1.5,6));
streamline(X,Y,Z,F1(X,Y,Z),F2(X,Y,Z),F3(X,Y,Z),S1,S2,S3)
te=text(-2,-2.5,-4,'F\"altlinjer','FontSize',14);