小编Jen*_*old的帖子

我在R中有以下直方图:

hist(alpha,cex.main=2,cex.axis=1.2,cex.lab=1.2,
main=expression(paste("Histogram of ",hat(mu), ", Bootstrap samples, Allianz")))

标题太长了,所以我想换线.根据这个线程,我试过

hist(alpha,cex.main=2,cex.axis=1.2,cex.lab=1.2,
main=expression(paste("Histogram of ",hat(mu), ",cat("\n") Bootstrap samples, Allianz")))

要么

hist(alpha,cex.main=2,cex.axis=1.2,cex.lab=1.2,
main=expression(paste("Histogram of ",hat(mu), cat("\n"),", Bootstrap samples, Allianz")))

但两者都不起作用,我怎样才能在paste()中获得换行符？

我想在R中计算以下内容:

罪(52.517°)

这应该等于0.79353.但是当我编码时

sin(52.517)

我明白了

0.777119

那我怎么能得到0.79353.我不擅长数学,但我知道有些东西不适用于度数和弧度测量.

我有一个朋友要我为他实施一些东西.让我们举一个简单的例子:我输入了四个值:Value1到Value4.使用这些值,我的R程序可以进行花哨的计算,并给出了很好的结果.

不,让我说我不想打扰我的朋友(从他的角度来看)复杂的r脚本并在那里输入值.所以我想编写一个简单的输入gui,然后将其作为可执行文件.现在我有两个问题:

我怎样才能创建这样的输入gui？

如何从中获取可执行文件？

我的rgl设备的全屏/非全屏问题.

目前我使用R 3.00

我将persp3d plot(library rgl)绘制到我的设备中,它在一个非常小的窗口中打开:

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

看起来像这样:

我现在旋转它并将单个png文件保存到我的驱动器中.问题是,png文件太小了？我想用LaTex和\animategraphics命令把它们放到一张纸上,但它是像pixely(不尖锐).

如果我点击rgl设备中的全屏图标,以便R图更大,这确实有帮助,一切正常.问题是,周围有太多的空白区域.由于它的上方,下方,左侧和右侧的空白区域,我无法将其包含在LaTex中,因为它的大尺寸(宽度,高度)不适合.我有200个png文件,所以用油漆手动删除空白区域不是一件好事.

小图片看起来像这样:

如果放大,会发生以下情况(这就是LaTex所做的,当我把它放到我的论文中时,它增加了图片,截图来自我的LaTex文件.相同的图片,角度略有不同,但问题保持不变):

你看它看起来很像(不好).此外,您已经可以看到具有太多空白区域的大文件的问题:上面有一些空白区域的小图片已经破坏了我的标题.

那么我怎么能解决这个问题呢？我怎么能告诉R使用全屏图,但周围没有那么多的空白区？当我点击全屏并保存这些图片时,一切都很好,除了周围的白色空间.

这是png文件周围有太多的空白区域(在此屏幕截图中,下方没有空白区域,但是当我使用正确的缩放时,它就在那里):

还有一点需要注意:这是我用来保存png文件的R代码:

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

我不知道我做错了什么.这很简单,但我不知道我的错误在哪里:

我有以下代码:

x<-seq(-3000,3000,length=1000)
hx<-dnorm(x,mean=0,sd=1392.857)

plot(x,hx,lwd=3,lty=4,col="blue")

这使

然后我编码:

plot(x,hx,lwd=3,lty=1,col="blue")

我得到了同样的照片？

为什么不在这里工作？同样适用于lwd？R莫名其妙地不认识它？

我从来没有像这样的问题.我刚下载了新的R版本,因为我的旧版本崩溃了.我的错误在哪里？

编辑:我怎样才能获得更薄的线？如果我使用lwd = 1它仍然很胖(只是稍微改变)？R线曾经非常薄,通常我不得不调整lwd？我怎样才能获得更细的线条？