Mam problem z pełnoekranowym / nie pełnym ekranem mojego urządzenia rgl.

Obecnie używam R 3.00

Przygotowuję działkę persp3d (biblioteka rgl) do mojego urządzenia, otwiera się ona w dość małym oknie:

Kod 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)])

Który wygląda tak:

Obróciłem go i zapisałem pojedyncze pliki png na dysku. Problem polega na tym, że pliki png są zbyt małe? Chcę umieścić je w jednym papierze za pomocą LaTex i\animategraphics polecenie, ale jest to pixely (nie ostre).

Jeśli kliknę ikonę pełnoekranową w urządzeniu rgl, aby wykres R był większy, to pomoże i wszystko działa. Problem polega na tym, że wokół jest za dużo białej przestrzeni. Z tą białą spacją powyżej, poniżej, z lewej i prawej strony nie mogę jej zawrzeć w LaTex, ponieważ nie pasuje ze względu na jej duży rozmiar (szerokość, wysokość). Mam 200 plików png, więc ręczne usunięcie białej przestrzeni farbą nie jest przyjemne.

Małe zdjęcia wyglądają tak:

Dzieje się tak, gdy powiększysz (to jest to, co robi LaTex, kiedy wkładam go do mojego papieru, zwiększa to obraz, zrzut ekranu jest z mojego pliku LaTex. Ten sam obraz, nieco inny kąt, ale problem pozostaje taki sam ):

Widzisz, że wygląda to piknie (nie dobrze). Problem z dużymi plikami można już zobaczyć także ze zbyt dużą ilością białego miejsca: mały obrazek z białą spacją już niszczy mój tytuł.

Jak więc mogę rozwiązać ten problem? Jak mogę powiedzieć R, aby używał wykresów pełnoekranowych, ale bez tak dużej ilości białej przestrzeni? Kiedy klikam na pełny ekran i zapisuję te zdjęcia, wszystko jest w porządku, z wyjątkiem białej przestrzeni wokół niego.

Oto plik png ze zbyt dużą ilością białych znaków wokół niego (na tym zrzucie ekranu nie ma białych spacji poniżej, ale gdy używam poprawnego powiększenia, jest tam):

Jeszcze jedna uwaga: to jest kod R, którego używam do zapisywania plików png:

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