在此问题中扩展 Jeremy K. 的问题将 ggsave() 纵横比设置为 RStudio 的“缩放”按钮给出的比率？具体来说
我用来ggsave()保存绘图ggplot()。
在 R-Studio 中，单击“缩放”按钮会自动调整大部分绘图的大小，使其具有相当美观的比例，而当我尝试手动指定大小和纵横比时，我得到的绘图看起来不太漂亮。
原问题的答案和类似问题的答案R：用命令在缩放窗口中保存图形？两者都解决了屏幕尺寸/分辨率的问题，但没有其他问题。正如最初的问题所述，RStudio 缩放具有美观的比例，但使用屏幕宽度和高度仅设置图表大小和分辨率。保存的图像与原始 Rstudio 缩放图像的标题、标签等都不同（在我的例子中很小）。不幸的是，使用“检查元素”建议仅给出屏幕尺寸，而不给出任何标题和标签尺寸。
有没有一种方法可以让我ggsave（或任何功能）使用与R-Studio 的“缩放”按钮相同的宽高比或大小以及 所有相同的格式？
试图第一次运行fancyrpartplot并遇到错误.
> fancyRpartPlot(rpart.sub1)
Error in loadNamespace(name) : there is no package called ‘rpart.plot’
我搜索和搜索但找不到解决方案.我已经尝试删除拨浪鼓和RGtk2并继续得到相同的错误.认为它与GTK +有关,但找不到任何显示如何删除和重新安装GTK +的东西
> remove.packages("RGtk2")
Removing package from ‘C:/Program Files/R/R-3.1.0/library’
(as ‘lib’ is unspecified)
> remove.packages("rattle")
Removing package from ‘C:/Program Files/R/R-3.1.0/library’
(as ‘lib’ is unspecified)
Restarting R session...
> install.packages("rattle")
also installing the dependency ‘RGtk2’
trying URL 'http://cran.rstudio.com/bin/windows/contrib/3.1/RGtk2_2.20.31.zip'
Content type 'application/zip' length 13914471 bytes (13.3 Mb)
opened URL
downloaded 13.3 Mb
trying URL 'http://cran.rstudio.com/bin/windows/contrib/3.1/rattle_4.0.0.zip'
Content type 'application/zip' length 3728887 bytes (3.6 Mb)
opened URL
downloaded 3.6 Mb …我编写了一个函数bs.pp来计算看跌期权的Black Scholes值.
bs.pp <- function (Price, Strike, sigma, texp, int) {
d1=(1 / (sigma*sqrt(texp)))*(log(Price/Strike)+(int+(sigma^2)/2)*texp)
d2=d1-sigma*sqrt(texp)
Strike*pnorm(-d2)*exp(-int*texp)-Price*pnorm(-d1)}
这似乎运作良好
> bs.pp(1000,1000,.2,1,.02)
[1] 69.35905
> bs.pp(1000,900,.25,1,.02)
[1] 46.15609
我现在想利用将R optimize函数来计算,当我们知道(该函数的反函数Price,Strike,texp,int)和功能,但没有结果sigma.
我试着这样做如下
gg <- function(Price, Strike, sigma, texp, int, PutPrice){(bs.pp(Price, Strike, sigma, texp, int) - PutPrice)^2}
xmin <- optimize(gg, c(0,1), tol = 0.0001, Price = 1000, Strike = 1000, texp = 1, int = 0.02, PutPrice = 69.4)
xmin$minimum
哪个返回错误
Error …短小
我试图用它tuneRF来寻找函数的最佳mtry值，randomForest但是我发现答案是非常不稳定的，并且会随着运行/运行种子的不同而变化。我将运行一个循环，以查看它如何在大量运行中发生变化，但是无法提取出mtry具有最低OOB错误的错误。
长龙
我有一个data.frame具有八个功能的功能，但是其中两个功能是包含性的，这意味着一个功能中的所有信息都是另一个功能的子集。例如，一个特征可能是因子A〜，c("animal', "fish")而另一个特征可能是因子B〜c("dog", "cat", "salmon", "trout")。因此，所有的猫狗都是动物，所有的鲑鱼和鳟鱼都是鱼。这两个变量远比其他六个变量重要。因此，如果我运行3个林，一个使用A，一个使用B，另一个使用A和B，则最后一个似乎表现最好。我怀疑这是因为A和/或B如此重要，以至于通过将两者同时包含在内，我有两倍的机会随机选择它们作为初始特征。我进一步怀疑我不应该允许这种情况发生，我应该将A排除在外，但是我找不到任何实际的说法。
无论如何回到正轨。我有两个数据集tRFx，tRFx2第一个包含7个特征，包括B但不包含A；第二个包含8个特征，同时包含A和B。我试图查看mtry这两个单独模型的最佳值彼此相对执行。tuneRF至少在这种情况下，问题似乎非常不稳定。
对于第一个数据集，（包括特征B但不包括特征A）
> set.seed(1)
> tuneRF(x = tRFx, y = tRFy, nTreeTry = 250, stepFactor = 1.5, improve = 0.01)
mtry = 2 OOB error = 17.73%
Searching left ...
Searching right ...
mtry = 3 OOB error = 17.28%
0.02531646 0.01
mtry = 4 OOB error = 18.41%
-0.06493506 …