Hi, I don't know much about the RGL package, and I have read the documentation and tried some parameters, with no luck... I would like to generate a movie from a 3D object (code below), where the vortex A is closer to the observer, and then the object rotates and the B vortex gets closer. I would like to capture this movie to a file. By the way, I am not being able to insert unicode text with text3d. rgl 0.82, R 2.8.1, Windows Vista. Any help would be appreciated. Code follows: library(rgl) open3d() coord.1=c(0,100,0) coord.2=c(100,100,0) coord.3=c(100,0,0) coord.4=c(0,0,0) coord.5=c(50,50,70) pyrcolor="red" triangles3d(rbind(coord.1,coord.4,coord.5),color=pyrcolor) triangles3d(rbind(coord.1,coord.2,coord.5),color=pyrcolor) triangles3d(rbind(coord.2,coord.3,coord.5),color=pyrcolor) triangles3d(rbind(coord.3,coord.4,coord.5),color=pyrcolor) quads3d(rbind(coord.1,coord.2,coord.3,coord.4),color=pyrcolor) vertices = LETTERS[1:5] text3d(coord.1,text=vertices[1],adj=1,color="blue") text3d(coord.2,text=vertices[2],adj=0,color="blue") text3d(coord.3,text=vertices[3],adj=0,color="blue") text3d(coord.4,text=vertices[4],adj=1,color="blue") text3d(coord.5,text=vertices[5],adj=0,color="blue") # couldn't make this work... #open3d(viewport=c(0,0,686,489)) #par3d(zoom = 1.157625) filename = "piramide.png" rgl.snapshot(filename)
Help with rgl
8 messages · Yihui Xie, Roger Koenker, Wacek Kusnierczyk +3 more
1 day later
(1) you'll need ImageMagick installed to use the command "convert" to convert image sequences into GIF animations; see ?movie3d (2) "viewport" is read only!! see ?open3d carefully Regards, Yihui -- Yihui Xie <xieyihui at gmail.com> Phone: +86-(0)10-82509086 Fax: +86-(0)10-82509086 Mobile: +86-15810805877 Homepage: http://www.yihui.name School of Statistics, Room 1037, Mingde Main Building, Renmin University of China, Beijing, 100872, China
On Tue, Feb 17, 2009 at 2:45 AM, Iuri Gavronski <iuri at ufrgs.br> wrote:
Hi, I don't know much about the RGL package, and I have read the documentation and tried some parameters, with no luck... I would like to generate a movie from a 3D object (code below), where the vortex A is closer to the observer, and then the object rotates and the B vortex gets closer. I would like to capture this movie to a file. By the way, I am not being able to insert unicode text with text3d. rgl 0.82, R 2.8.1, Windows Vista. Any help would be appreciated. Code follows: library(rgl) open3d() coord.1=c(0,100,0) coord.2=c(100,100,0) coord.3=c(100,0,0) coord.4=c(0,0,0) coord.5=c(50,50,70) pyrcolor="red" triangles3d(rbind(coord.1,coord.4,coord.5),color=pyrcolor) triangles3d(rbind(coord.1,coord.2,coord.5),color=pyrcolor) triangles3d(rbind(coord.2,coord.3,coord.5),color=pyrcolor) triangles3d(rbind(coord.3,coord.4,coord.5),color=pyrcolor) quads3d(rbind(coord.1,coord.2,coord.3,coord.4),color=pyrcolor) vertices = LETTERS[1:5] text3d(coord.1,text=vertices[1],adj=1,color="blue") text3d(coord.2,text=vertices[2],adj=0,color="blue") text3d(coord.3,text=vertices[3],adj=0,color="blue") text3d(coord.4,text=vertices[4],adj=1,color="blue") text3d(coord.5,text=vertices[5],adj=0,color="blue") # couldn't make this work... #open3d(viewport=c(0,0,686,489)) #par3d(zoom = 1.157625) filename = "piramide.png" rgl.snapshot(filename)
Why I love R [Number 6]: Chinese extend a helping hand to Russians who happen to be in Brazil about a package written in Germany. Trotsky would be proud -- and amazed! url: www.econ.uiuc.edu/~roger Roger Koenker email rkoenker at uiuc.edu Department of Economics vox: 217-333-4558 University of Illinois fax: 217-244-6678 Champaign, IL 61820
On Feb 17, 2009, at 8:37 PM, Yihui Xie wrote:
(1) you'll need ImageMagick installed to use the command "convert" to convert image sequences into GIF animations; see ?movie3d (2) "viewport" is read only!! see ?open3d carefully Regards, Yihui -- Yihui Xie <xieyihui at gmail.com> Phone: +86-(0)10-82509086 Fax: +86-(0)10-82509086 Mobile: +86-15810805877 Homepage: http://www.yihui.name School of Statistics, Room 1037, Mingde Main Building, Renmin University of China, Beijing, 100872, China On Tue, Feb 17, 2009 at 2:45 AM, Iuri Gavronski <iuri at ufrgs.br> wrote:
Hi, I don't know much about the RGL package, and I have read the documentation and tried some parameters, with no luck... I would like to generate a movie from a 3D object (code below), where the vortex A is closer to the observer, and then the object rotates and the B vortex gets closer. I would like to capture this movie to a file. By the way, I am not being able to insert unicode text with text3d. rgl 0.82, R 2.8.1, Windows Vista. Any help would be appreciated. Code follows: library(rgl) open3d() coord.1=c(0,100,0) coord.2=c(100,100,0) coord.3=c(100,0,0) coord.4=c(0,0,0) coord.5=c(50,50,70) pyrcolor="red" triangles3d(rbind(coord.1,coord.4,coord.5),color=pyrcolor) triangles3d(rbind(coord.1,coord.2,coord.5),color=pyrcolor) triangles3d(rbind(coord.2,coord.3,coord.5),color=pyrcolor) triangles3d(rbind(coord.3,coord.4,coord.5),color=pyrcolor) quads3d(rbind(coord.1,coord.2,coord.3,coord.4),color=pyrcolor) vertices = LETTERS[1:5] text3d(coord.1,text=vertices[1],adj=1,color="blue") text3d(coord.2,text=vertices[2],adj=0,color="blue") text3d(coord.3,text=vertices[3],adj=0,color="blue") text3d(coord.4,text=vertices[4],adj=1,color="blue") text3d(coord.5,text=vertices[5],adj=0,color="blue") # couldn't make this work... #open3d(viewport=c(0,0,686,489)) #par3d(zoom = 1.157625) filename = "piramide.png" rgl.snapshot(filename)
______________________________________________ R-help at r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
"Chinese extend a helping hand to Russians who happen to be in Brazil about a package written in Germany," which gladdened an American. Trotsky would be even more proud -- and amazed!! :-) Regards, Yihui -- Yihui Xie <xieyihui at gmail.com> Phone: +86-(0)10-82509086 Fax: +86-(0)10-82509086 Mobile: +86-15810805877 Homepage: http://www.yihui.name School of Statistics, Room 1037, Mingde Main Building, Renmin University of China, Beijing, 100872, China On Wed, Feb 18, 2009 at 11:07 AM, roger koenker
<roger at ysidro.econ.uiuc.edu> wrote:
Why I love R [Number 6]: Chinese extend a helping hand to Russians who happen to be in Brazil about a package written in Germany. Trotsky would be proud -- and amazed! url: www.econ.uiuc.edu/~roger Roger Koenker email rkoenker at uiuc.edu Department of Economics vox: 217-333-4558 University of Illinois fax: 217-244-6678 Champaign, IL 61820 On Feb 17, 2009, at 8:37 PM, Yihui Xie wrote:
(1) you'll need ImageMagick installed to use the command "convert" to convert image sequences into GIF animations; see ?movie3d (2) "viewport" is read only!! see ?open3d carefully Regards, Yihui -- Yihui Xie <xieyihui at gmail.com> Phone: +86-(0)10-82509086 Fax: +86-(0)10-82509086 Mobile: +86-15810805877 Homepage: http://www.yihui.name School of Statistics, Room 1037, Mingde Main Building, Renmin University of China, Beijing, 100872, China On Tue, Feb 17, 2009 at 2:45 AM, Iuri Gavronski <iuri at ufrgs.br> wrote:
Hi, I don't know much about the RGL package, and I have read the documentation and tried some parameters, with no luck... I would like to generate a movie from a 3D object (code below), where the vortex A is closer to the observer, and then the object rotates and the B vortex gets closer. I would like to capture this movie to a file. By the way, I am not being able to insert unicode text with text3d. rgl 0.82, R 2.8.1, Windows Vista. Any help would be appreciated. Code follows: library(rgl) open3d() coord.1=c(0,100,0) coord.2=c(100,100,0) coord.3=c(100,0,0) coord.4=c(0,0,0) coord.5=c(50,50,70) pyrcolor="red" triangles3d(rbind(coord.1,coord.4,coord.5),color=pyrcolor) triangles3d(rbind(coord.1,coord.2,coord.5),color=pyrcolor) triangles3d(rbind(coord.2,coord.3,coord.5),color=pyrcolor) triangles3d(rbind(coord.3,coord.4,coord.5),color=pyrcolor) quads3d(rbind(coord.1,coord.2,coord.3,coord.4),color=pyrcolor) vertices = LETTERS[1:5] text3d(coord.1,text=vertices[1],adj=1,color="blue") text3d(coord.2,text=vertices[2],adj=0,color="blue") text3d(coord.3,text=vertices[3],adj=0,color="blue") text3d(coord.4,text=vertices[4],adj=1,color="blue") text3d(coord.5,text=vertices[5],adj=0,color="blue") # couldn't make this work... #open3d(viewport=c(0,0,686,489)) #par3d(zoom = 1.157625) filename = "piramide.png" rgl.snapshot(filename)
______________________________________________ R-help at r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
roger koenker wrote:
Why I love R [Number 6]: Chinese extend a helping hand to Russians who happen to be in Brazil about a package written in Germany. Trotsky would be proud -- and amazed!
... and it's so . r specific! vQ
Yihui Xie wrote:
"Chinese extend a helping hand to Russians who happen to be in Brazil about a package written in Germany," which gladdened an American. Trotsky would be even more proud -- and amazed!! :-)
Please note that rgl is maintained by a Canadian and two others (O. Nenadi? and W. Zucchini) who, I guess, are from different nationalities as well have been involved in first versions of OpenGL interfaces. Best, Uwe Ligges
Regards, Yihui -- Yihui Xie <xieyihui at gmail.com> Phone: +86-(0)10-82509086 Fax: +86-(0)10-82509086 Mobile: +86-15810805877 Homepage: http://www.yihui.name School of Statistics, Room 1037, Mingde Main Building, Renmin University of China, Beijing, 100872, China On Wed, Feb 18, 2009 at 11:07 AM, roger koenker <roger at ysidro.econ.uiuc.edu> wrote:
Why I love R [Number 6]: Chinese extend a helping hand to Russians who happen to be in Brazil about a package written in Germany. Trotsky would be proud -- and amazed! url: www.econ.uiuc.edu/~roger Roger Koenker email rkoenker at uiuc.edu Department of Economics vox: 217-333-4558 University of Illinois fax: 217-244-6678 Champaign, IL 61820 On Feb 17, 2009, at 8:37 PM, Yihui Xie wrote:
(1) you'll need ImageMagick installed to use the command "convert" to convert image sequences into GIF animations; see ?movie3d (2) "viewport" is read only!! see ?open3d carefully Regards, Yihui -- Yihui Xie <xieyihui at gmail.com> Phone: +86-(0)10-82509086 Fax: +86-(0)10-82509086 Mobile: +86-15810805877 Homepage: http://www.yihui.name School of Statistics, Room 1037, Mingde Main Building, Renmin University of China, Beijing, 100872, China On Tue, Feb 17, 2009 at 2:45 AM, Iuri Gavronski <iuri at ufrgs.br> wrote:
Hi, I don't know much about the RGL package, and I have read the documentation and tried some parameters, with no luck... I would like to generate a movie from a 3D object (code below), where the vortex A is closer to the observer, and then the object rotates and the B vortex gets closer. I would like to capture this movie to a file. By the way, I am not being able to insert unicode text with text3d. rgl 0.82, R 2.8.1, Windows Vista. Any help would be appreciated. Code follows: library(rgl) open3d() coord.1=c(0,100,0) coord.2=c(100,100,0) coord.3=c(100,0,0) coord.4=c(0,0,0) coord.5=c(50,50,70) pyrcolor="red" triangles3d(rbind(coord.1,coord.4,coord.5),color=pyrcolor) triangles3d(rbind(coord.1,coord.2,coord.5),color=pyrcolor) triangles3d(rbind(coord.2,coord.3,coord.5),color=pyrcolor) triangles3d(rbind(coord.3,coord.4,coord.5),color=pyrcolor) quads3d(rbind(coord.1,coord.2,coord.3,coord.4),color=pyrcolor) vertices = LETTERS[1:5] text3d(coord.1,text=vertices[1],adj=1,color="blue") text3d(coord.2,text=vertices[2],adj=0,color="blue") text3d(coord.3,text=vertices[3],adj=0,color="blue") text3d(coord.4,text=vertices[4],adj=1,color="blue") text3d(coord.5,text=vertices[5],adj=0,color="blue") # couldn't make this work... #open3d(viewport=c(0,0,686,489)) #par3d(zoom = 1.157625) filename = "piramide.png" rgl.snapshot(filename)
______________________________________________ R-help at r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
______________________________________________ R-help at r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
The funniest part is that we are close to carnival in Brazil... vacation time... more than 30C... and I am the one to try to get back to the track... Any clue on how to rotate the object? Examples? Also, still on the same object. If I change zoom, position, etc. with the mouse, where to query this information, for reproducing the same image later on? Best, Iuri. On Wed, Feb 18, 2009 at 6:56 AM, Uwe Ligges
<ligges at statistik.tu-dortmund.de> wrote:
Yihui Xie wrote:
"Chinese extend a helping hand to Russians who happen to be in Brazil about a package written in Germany," which gladdened an American. Trotsky would be even more proud -- and amazed!! :-)
Please note that rgl is maintained by a Canadian and two others (O. Nenadi? and W. Zucchini) who, I guess, are from different nationalities as well have been involved in first versions of OpenGL interfaces. Best, Uwe Ligges
Regards, Yihui -- Yihui Xie <xieyihui at gmail.com> Phone: +86-(0)10-82509086 Fax: +86-(0)10-82509086 Mobile: +86-15810805877 Homepage: http://www.yihui.name School of Statistics, Room 1037, Mingde Main Building, Renmin University of China, Beijing, 100872, China On Wed, Feb 18, 2009 at 11:07 AM, roger koenker <roger at ysidro.econ.uiuc.edu> wrote:
Why I love R [Number 6]: Chinese extend a helping hand to Russians who happen to be in Brazil about a package written in Germany. Trotsky would be proud -- and amazed! url: www.econ.uiuc.edu/~roger Roger Koenker email rkoenker at uiuc.edu Department of Economics vox: 217-333-4558 University of Illinois fax: 217-244-6678 Champaign, IL 61820 On Feb 17, 2009, at 8:37 PM, Yihui Xie wrote:
(1) you'll need ImageMagick installed to use the command "convert" to convert image sequences into GIF animations; see ?movie3d (2) "viewport" is read only!! see ?open3d carefully Regards, Yihui -- Yihui Xie <xieyihui at gmail.com> Phone: +86-(0)10-82509086 Fax: +86-(0)10-82509086 Mobile: +86-15810805877 Homepage: http://www.yihui.name School of Statistics, Room 1037, Mingde Main Building, Renmin University of China, Beijing, 100872, China On Tue, Feb 17, 2009 at 2:45 AM, Iuri Gavronski <iuri at ufrgs.br> wrote:
Hi, I don't know much about the RGL package, and I have read the documentation and tried some parameters, with no luck... I would like to generate a movie from a 3D object (code below), where the vortex A is closer to the observer, and then the object rotates and the B vortex gets closer. I would like to capture this movie to a file. By the way, I am not being able to insert unicode text with text3d. rgl 0.82, R 2.8.1, Windows Vista. Any help would be appreciated. Code follows: library(rgl) open3d() coord.1=c(0,100,0) coord.2=c(100,100,0) coord.3=c(100,0,0) coord.4=c(0,0,0) coord.5=c(50,50,70) pyrcolor="red" triangles3d(rbind(coord.1,coord.4,coord.5),color=pyrcolor) triangles3d(rbind(coord.1,coord.2,coord.5),color=pyrcolor) triangles3d(rbind(coord.2,coord.3,coord.5),color=pyrcolor) triangles3d(rbind(coord.3,coord.4,coord.5),color=pyrcolor) quads3d(rbind(coord.1,coord.2,coord.3,coord.4),color=pyrcolor) vertices = LETTERS[1:5] text3d(coord.1,text=vertices[1],adj=1,color="blue") text3d(coord.2,text=vertices[2],adj=0,color="blue") text3d(coord.3,text=vertices[3],adj=0,color="blue") text3d(coord.4,text=vertices[4],adj=1,color="blue") text3d(coord.5,text=vertices[5],adj=0,color="blue") # couldn't make this work... #open3d(viewport=c(0,0,686,489)) #par3d(zoom = 1.157625) filename = "piramide.png" rgl.snapshot(filename)
______________________________________________ R-help at r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
______________________________________________ R-help at r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
______________________________________________ R-help at r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
On 18/02/2009 10:00 AM, Iuri Gavronski wrote:
The funniest part is that we are close to carnival in Brazil... vacation time... more than 30C... and I am the one to try to get back to the track... Any clue on how to rotate the object? Examples?
example(spin3d)
Also, still on the same object. If I change zoom, position, etc. with the mouse, where to query this information, for reproducing the same image later on?
See ?par3d. When you release the mouse, the "userMatrix" is updated to reflect the current position. You may also have changed "scale" and "projMatrix". Duncan Murdoch
Best, Iuri. On Wed, Feb 18, 2009 at 6:56 AM, Uwe Ligges <ligges at statistik.tu-dortmund.de> wrote:
Yihui Xie wrote:
"Chinese extend a helping hand to Russians who happen to be in Brazil about a package written in Germany," which gladdened an American. Trotsky would be even more proud -- and amazed!! :-)
Please note that rgl is maintained by a Canadian and two others (O. Nenadi? and W. Zucchini) who, I guess, are from different nationalities as well have been involved in first versions of OpenGL interfaces. Best, Uwe Ligges
Regards, Yihui -- Yihui Xie <xieyihui at gmail.com> Phone: +86-(0)10-82509086 Fax: +86-(0)10-82509086 Mobile: +86-15810805877 Homepage: http://www.yihui.name School of Statistics, Room 1037, Mingde Main Building, Renmin University of China, Beijing, 100872, China On Wed, Feb 18, 2009 at 11:07 AM, roger koenker <roger at ysidro.econ.uiuc.edu> wrote:
Why I love R [Number 6]: Chinese extend a helping hand to Russians who happen to be in Brazil about a package written in Germany. Trotsky would be proud -- and amazed! url: www.econ.uiuc.edu/~roger Roger Koenker email rkoenker at uiuc.edu Department of Economics vox: 217-333-4558 University of Illinois fax: 217-244-6678 Champaign, IL 61820 On Feb 17, 2009, at 8:37 PM, Yihui Xie wrote:
(1) you'll need ImageMagick installed to use the command "convert" to convert image sequences into GIF animations; see ?movie3d (2) "viewport" is read only!! see ?open3d carefully Regards, Yihui -- Yihui Xie <xieyihui at gmail.com> Phone: +86-(0)10-82509086 Fax: +86-(0)10-82509086 Mobile: +86-15810805877 Homepage: http://www.yihui.name School of Statistics, Room 1037, Mingde Main Building, Renmin University of China, Beijing, 100872, China On Tue, Feb 17, 2009 at 2:45 AM, Iuri Gavronski <iuri at ufrgs.br> wrote:
Hi, I don't know much about the RGL package, and I have read the documentation and tried some parameters, with no luck... I would like to generate a movie from a 3D object (code below), where the vortex A is closer to the observer, and then the object rotates and the B vortex gets closer. I would like to capture this movie to a file. By the way, I am not being able to insert unicode text with text3d. rgl 0.82, R 2.8.1, Windows Vista. Any help would be appreciated. Code follows: library(rgl) open3d() coord.1=c(0,100,0) coord.2=c(100,100,0) coord.3=c(100,0,0) coord.4=c(0,0,0) coord.5=c(50,50,70) pyrcolor="red" triangles3d(rbind(coord.1,coord.4,coord.5),color=pyrcolor) triangles3d(rbind(coord.1,coord.2,coord.5),color=pyrcolor) triangles3d(rbind(coord.2,coord.3,coord.5),color=pyrcolor) triangles3d(rbind(coord.3,coord.4,coord.5),color=pyrcolor) quads3d(rbind(coord.1,coord.2,coord.3,coord.4),color=pyrcolor) vertices = LETTERS[1:5] text3d(coord.1,text=vertices[1],adj=1,color="blue") text3d(coord.2,text=vertices[2],adj=0,color="blue") text3d(coord.3,text=vertices[3],adj=0,color="blue") text3d(coord.4,text=vertices[4],adj=1,color="blue") text3d(coord.5,text=vertices[5],adj=0,color="blue") # couldn't make this work... #open3d(viewport=c(0,0,686,489)) #par3d(zoom = 1.157625) filename = "piramide.png" rgl.snapshot(filename)
______________________________________________ R-help at r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
______________________________________________ R-help at r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
______________________________________________ R-help at r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
______________________________________________ R-help at r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.