Вы можете сделать это легко с помощью функции arrows
:
x <- c(0,2)
y <- c(1,2)
plot(x,y)
arrows(x[1],y[1],x[2],y[2])
Для 3D-векторов проверьте пакет plot3D.Он имеет функцию arrows3D
, которая способна отображать отдельные трехмерные векторы.Для получения дополнительной информации об этом пакете проверьте документацию
arrows3D (0, 0, 0, 3, 3, 3,
colvar = NULL, phi = 40, theta = 40,
col = NULL, NAcol = "white", breaks = NULL,
colkey = NULL, panel.first = NULL,
clim = NULL, clab = NULL, bty = "b", type = "triangle",
add = FALSE, plot = TRUE)