Я могу нарисовать сплайн через 10 последовательных точек, как это было сделано в этом сообщении
set.seed(1)
n <- 10
x <- runif(n)
y <- runif(n)
p <- cbind(x,y)
xlim <- c(min(x) - 0.1*diff(range(x)), c(max(x) + 0.1*diff(range(x))))
ylim <- c(min(y) - 0.1*diff(range(y)), c(max(y) + 0.1*diff(range(y))))
plot(p, xlim=xlim, ylim=ylim)
text(p, labels=seq(n), pos=3)
xspline(x, y, shape = c(0,rep(-1, 10-2),0), border="red")
Но можно ли заставить направление линии в каждой точке находиться в определенном направлении? - Например, если в точке № 2 курс был равен 0, это заставило бы идти прямо вверх, а не так, как сейчас, в северо-восточном направлении.
Как на компасе: 0 = север, 90 = восток, 180 = юг и 270 = запад.
Например, вы можете использовать следующие 10 заголовков:
h <- round(runif(n, min = 0, max = 359),0)
Кроме того, вывод должен быть в состоянии сохранить в виде пространственной линии.