On 30/10/2021 3:06 p.m., Cleber Borges via R-help wrote:
library( jpeg ); library( rgl ); library( grid )
logo <- readJPEG( Rlogo )
x <- seq( 0,1,len=10 )
open3d()
plot3d( x, x, x, type='n' )
show2d({
par(mar=c(0,0,0,0))
grid.raster( logo, x=0, width=1, y=0 )
})
That's close; the only change I'd make is to the location:
library( jpeg ); library( rgl ); library( grid )
logo <- readJPEG( Rlogo )
x <- seq( 0,1,len=10 )
open3d()
plot3d( x, x, x, type='n' )
show2d({
par(mar=c(0,0,0,0))
grid.raster( logo, x=0.5, width=1, y=0.5 )
})
Duncan Murdoch
______________________________________________
R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
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.
