  % Parámetros 
 t = linspace(-1,1,20);
  x = t;
 y = 2*cosh(t/2);
  % Velocidad y aceleración 
 V1 = ones(size(t));  
 V2 = sinh(t/2);
 A1 = zeros(size(t));  
 A2 = (1/2)*cosh(t/2); %duda con ese signo menos de la derivada
 
 % Gráfica 
 figure
hold on
plot(x, y, 'r');
quiver(x, y, V1, V2, 1, "Color", "c");
quiver(x, y, A1, A2, 1, "color", "m");
 axis equal
 hold off;

% Centrado de la grafica en el origen de coordenadas
 ax = gca;
ax.XAxisLocation = 'origin';
ax.YAxisLocation = 'origin';
 
% Etiquetas
 xlabel("x", "FontSize", 10);
ylabel("y", "FontSize", 10);