function v2d_kresliVektor(begX,begY,endX,endY)

%zaciatok vektora
plot([begX],[begY],'ok', 'MarkerEdgeColor','k',...
                'MarkerFaceColor','k',...
                'MarkerSize',10)

            %Telo vektora
plot([begX,endX],[begY,endY],'-k','LineWidth',4)

%sipka na konci
p0 = [begX,begY]
p1=  [endX,endY]
p = p1-p0;
alpha = 0.5;  % Size of arrow head relative to the length of the vector
beta = 0.5;  % Width of the base of the arrow head relative to the length
%hu = [endX-alpha*(p(1)+beta*(p(2)+eps)); endX; endX-alpha*(p(1)-beta*(p(2)+eps))];
%hv = [endY-alpha*(p(2)-beta*(p(1)+eps)); endY; endY-alpha*(p(2)+beta*(p(1)+eps))];
hu = [endX-alpha*(p(1)+beta*(p(2))); endX; endX-alpha*(p(1)-beta*(p(2)))];
hv = [endY-alpha*(p(2)-beta*(p(1))); endY; endY-alpha*(p(2)+beta*(p(1)))];
plot(hu(:),hv(:))