Я рисую некоторые точечные данные, используя plot3d(). Я хотел бы приблизить метки деления оси Y к меткам деления оси Y.
Лучший способ, который я могу придумать, это
1) сначала построить данные, не рисуя оси
2) вызвать axis3d(), чтобы нарисовать ось y и деления, но скрыть метки от рисуется.
3) запросить текущее положение каждой метки деления в трехмерном пространстве. Сохраните позиции в векторе.
4) используйте mtext3d() для добавления меток к позициям на основе настройки вектора
У меня возникла проблема на шаге 3. Я не знаю, как запросить положение каждой метки. par3d() позволяет вам запрашивать ряд графических параметров, есть ли что-то подобное, которое я могу использовать, чтобы получить положение каждого тика по оси Y?
Я подхожу к этому неправильно? Наверное.
Вот пример кода без добавления текста для меток оси Y....
require(rgl)
x <- rnorm(5)
y <- rnorm(5)
z <- rnorm(5)
open3d()
plot3d(x,y,z,axes=F,xlab="",ylab="",zlab="")
par3d(ignoreExtent=TRUE)
par3d(FOV=0)
par3d(userMatrix=rotationMatrix(0,1,0,0))
axis3d('y',nticks=5,labels = FALSE)
par3d(zoom=1)
par3d(windowRect=c(580,60,1380,900))