func/plotQuiver.m at main · Roger-Chuh/func · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
function plotQuiver(rvecccc,varargin)

if (nargin == 1)
    color1 = [1 0 0];
    has_color = false;
elseif (nargin == 2)
    has_color = true;
    color1 = varargin{1};
else
    error('Too many input arguments');
end

if has_color
    quiver3(zeros(size(rvecccc,1),1),zeros(size(rvecccc,1),1),zeros(size(rvecccc,1),1),rvecccc(:,1),rvecccc(:,2),rvecccc(:,3),'Color',color1,'LineWidth', 2,'MarkerSize', 2);axis equal
    hold on;
    plot3(rvecccc(:,1),rvecccc(:,2),rvecccc(:,3),'s', 'Color', color1,'LineWidth', 2,'MarkerSize', 10);
else
    quiver3(zeros(size(rvecccc,1),1),zeros(size(rvecccc,1),1),zeros(size(rvecccc,1),1),rvecccc(:,1),rvecccc(:,2),rvecccc(:,3),'LineWidth', 2,'MarkerSize', 2);axis equal
    hold on;
    plot3(rvecccc(:,1),rvecccc(:,2),rvecccc(:,3),'s','LineWidth', 2,'MarkerSize', 10);
end

% % quiver3(0,0,0,rvecccc(1,1),rvecccc(1,2),rvecccc(1,3),'Color',[0 0 1],'LineWidth',5);axis equal
% % plot3(rvecccc(1,1),rvecccc(1,2),rvecccc(1,3),'*b','MarkerSize',15,'LineWidth',5);


end