You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
Since I upgraded R to version 4.4.0, my mesh3d plot no longer appears. The viewer renders a blank page. This mesh is large and if I reduce it then it appears.
library(plotly)
library(rmarchingcubes)
R<-2f1<-function(x, y, z){
x^2+y^2+z^2-R^2
}
f2<-function(x, y, z){
(x-2)^2+ (y-2)^2+ (z-2)^2-R^2
}
g<-function(x, y, z) {
pmax(f1(x, y, z), f2(x, y, z))
}
n<-100x_<-y_<-z_<- seq(-R, R, length.out=n)
Grid<- expand.grid(X=x_, Y=y_, Z=z_)
voxel<- with(Grid, array(g(X, Y, Z), dim= c(n, n, n)))
surf<- contour3d(voxel, level=0, x_, y_, z_)
vertices<-surf$verticesindices<-surf$triangles-1L
plot_ly(
x=vertices[, 1], y=vertices[, 2], z=vertices[, 3],
i=indices[, 1], j=indices[, 2], k=indices[, 3],
type="mesh3d"
) %>% layout(scene=list(aspectmode="data"))
If you replace n <- 100 with n <- 50 then the expected plot appears.
The text was updated successfully, but these errors were encountered:
Hello,
Since I upgraded R to version 4.4.0, my
mesh3d
plot no longer appears. The viewer renders a blank page. This mesh is large and if I reduce it then it appears.If you replace
n <- 100
withn <- 50
then the expected plot appears.The text was updated successfully, but these errors were encountered: