I want to represent a series of results computed from y = f(x1, x2, x3), with x1, x2 and x3 being in the [-2, +2] range.
For now, I use the "scatter3d" package, and an example of a resulting plot is attached to this question.
You can see that the axis starts at -2 for the three explanatory variables. However, I would like to have the axis centered on 0,0,0 in order to better identify negative and positive values.
Any idea on how to do that ?
Is that car::scatter3d() ?
This is a high-level function using rgl. You can use the rgl functions to add whatever you want to the scene. I think scatter3d() defines the plotting region as a cube in (0..1, 0..1, 0..1). This, if your axis limits range from -2 to 2, the origin is in the middle of (0..1), what is 0.5. So you can add lines:
rgl::lines3d(x = c(0,1), y= c(0.5,0.5), z = c(0.5,0.5), lwd=3, col="black")
for the x-axis etc.
or entire axes including ticks and numbers:
rgl::axis3d("x", pos = 0.5, lwd=3, col = "black")
I don't know a good way to suppress the default axes drawn by scatter3d(). You can possibly set axis.col = NA, text.col = NA to make them invidsible.
Hello,
check this links (python)
http://code.activestate.com/recipes/578287-multidimensional-pareto-front/
Good Luck
Hi Jochen,
Yes, this an interesting solution. The "lines3d" approach allows drawing a "3D cross" in the midddle of the cube.
Hiding the original axis is easy using a simple trick : use the same color as the background (white).
Unfortunately, the "axid3d" solution is not satisfactory as the ticks are in the 0,1 space, and not the -2, 2 range. Any idea how to change this ? Otherwise, I'm already satisfied the the cross in the middle with axis on the cube.
Thanks for this
A solution is to manually add the tick labels. An axis label can also be added using mtext3d. I have now exactly what I was looking for...
l1 = paste(intToUtf8(955), "cost")
l2 = paste(intToUtf8(955), "duration")
l3 = paste(intToUtf8(955), "length")
axisCol = "black"
labelCol = "blue"
rgl::axis3d("x", pos = 0.5, lwd=1, col = axisCol, labels=c("-2", "0", "2"), tick=TRUE, nticks=2)
rgl::axis3d("y", pos = 0.5, lwd=1, col = axisCol, labels=c("-2", "2"), tick=TRUE, nticks=1)
rgl::axis3d("z", pos = 0.5, lwd=1, col = axisCol, labels=c("-2", "2"), tick=TRUE, nticks=1)
rgl::mtext3d(text=l1, edge="x", pos=0.5, col=labelCol, at=0)
rgl::mtext3d(text=l2, edge="y", pos=0.5, col=labelCol, at=0)
rgl::mtext3d(text=l3, edge="z", pos=0.5, col=labelCol, at=0)
- Badges
- Science topic
- Similar topics
- Mathematics
- Statistics
- Statistical Software
- R