Tengo un problema con la pantalla completa / no pantalla completa de mi dispositivo rgl.

Actualmente uso R 3.00

Trazo una trama persp3d (library rgl) en mi dispositivo, se abre en una ventana bastante pequeña:

El código R:

persp3d(x, y, z, theta=50, phi=25, expand=0.75, col=red,
        ticktype="detailed", xlab="", ylab="", zlab="",axes=FALSE)
axes3d(c('x--','z'))

axis3d(edge='y+-',at =c(1,500,1000,1500,2000,2320),
labels =rownames(fd)[c(1,500,1000,1500,2000,2320)])

Que se parece a esto:

Ahora lo giré y guardé los archivos png únicos en mi disco. El problema es que los archivos png son demasiado pequeños? Quiero ponerlos en un papel usando LaTex y el\animategraphics comando, pero es para pixely (no fuerte).

Si hago clic en el icono de pantalla completa en el dispositivo rgl, para que el gráfico de R sea más grande, esto ayuda y todo funciona. El problema es que hay demasiado espacio en blanco a su alrededor. Con este espacio en blanco arriba, abajo, a la izquierda y a la derecha, no puedo incluirlo en LaTex, porque no se ajusta debido a su gran tamaño (ancho, alto). Tengo 200 archivos png, así que eliminar el espacio en blanco manualmente con pintura no es un buen trabajo.

Las fotos pequeñas se ven así:

Lo siguiente sucede, si hace zoom (esto es, lo que hace LaTex, cuando lo coloco en mi papel, aumenta la imagen, la captura de pantalla es de mi archivo LaTex. La misma imagen, un ángulo ligeramente diferente, pero el problema sigue siendo el mismo ):

Usted ve que se ve de manera puntual (no es bueno). También puedes ver el problema con los archivos grandes con demasiado espacio en blanco: la imagen pequeña con un espacio en blanco encima ya destruye mi título.

Entonces, ¿cómo podría resolver este problema? ¿Cómo puedo decirle a R que use los gráficos de pantalla completa pero sin tanto espacio en blanco a su alrededor? Cuando hago clic en pantalla completa y guardo esas imágenes, todo está bien, excepto el espacio en blanco que lo rodea.

Aquí está el archivo png con demasiado espacio en blanco a su alrededor (en esta captura de pantalla no hay espacio en blanco debajo, pero cuando uso el zoom correcto, está ahí):

Una nota adicional: este es el código R que utilizo para guardar los archivos png:

M <- par3d("userMatrix")
movie3d( spin3d(rpm=3), duration=20,dir="C:/test/movie", clean=FALSE )
play3d( spin3d(rpm=3), duration=20)