首页
学习
活动
专区
圈层
工具
发布
首页
学习
活动
专区
圈层
工具
MCP广场
社区首页 >问答首页 >如何提高gif图像的分辨率?

如何提高gif图像的分辨率?
EN

Stack Overflow用户
提问于 2013-01-23 12:12:32
回答 1查看 1.8K关注 0票数 3

如何提高R (plot3d和movie3d函数)的rgl软件包产生的gif图像的分辨率--无论是外部还是通过R?

R代码:

代码语言:javascript
运行
复制
MyX<-rnorm(10,5,1)
MyY<-rnorm(10,5,1)
MyZ<-rnorm(10,5,1)
plot3d(MyX, MyY, MyZ, xlab="X", ylab="Y", zlab="Z", type="s", box=T, axes=F)
text3d(MyX, MyY, MyZ, text=c(1:10), cex=5, adj=1)
movie3d(spin3d(axis = c(0, 0, 1), rpm = 4), duration=15, movie="TestMovie",
                                                type="gif", dir=("~/Desktop"))

产出:

更新

在代码开头添加这一行解决了这个问题。

代码语言:javascript
运行
复制
r3dDefaults$windowRect <- c(0, 100, 1400, 1400) 
EN

回答 1

Stack Overflow用户

回答已采纳

发布于 2013-01-23 12:39:30

我不认为你能为解决这个问题做多少事。我认为你必须使图像大得多,作为一种选择,然后当你显示它更小,它看起来更好。这是未经测试的,因为最近的一次升级为我打破了一两件事,但这确实在2.15下起作用:

代码语言:javascript
运行
复制
par3d(windowRect = c(0, 0, 500, 500)) # make the window large
par3d(zoom = 1.1) # larger values make the image smaller

# you can test your settings interactively at this point

M <- par3d("userMatrix") # save your settings to pass to the movie

movie3d(par3dinterp(userMatrix=list(M,
    rotate3d(M, pi, 1, 0, 0), 
    rotate3d(M, pi, 0, 1, 0) ) ), 
    duration = 5, fps = 50,
    movie = "MyMovie")

HTH。如果它不太适合您,请查看所使用的函数并调整设置。

票数 4
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/14479455

复制
相关文章

相似问题

领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档