使用 gamlss histDist 函数更改直方图的颜色答案

【问题标题】：Changing the color of a histogram made using gamlss histDist function使用 gamlss histDist 函数更改直方图的颜色
【发布时间】：2017-09-11 17:17:57
【问题描述】：

我想更改使用gamlss::histDist() 制作的直方图中的默认灰度。我已尝试搜索，但找不到任何有关如何搜索的信息。

这里是包文档中的一个小例子：

require(gamlss)
data(abdom)
histDist(y,family="NO", ylim=c(0,0.005), data=abdom)

这会产生这个情节：

如何更改这些垃圾箱的颜色？

【问题讨论】：

函数 histDist 调用设置 col = "cyan" 的 MASS::truehist。如果您直接调用truehist，则可以更改此设置，但如果您调用histDist，则显然不能。这是因为histDist 的点参数... 并不意味着传递图形参数。根据手册，它的意思是for extra arguments to be passed to the gamlss function。

标签： r histogram

【解决方案1】：

您无法更改 bin 的颜色，因为没有可供用户使用的参数。您可以自己绘制直方图，然后添加密度曲线。

require(gamlss)
mod <- histDist(y,family="NO", data=abdom)
hist(abdom$y, freq=FALSE, col='pink')
curve(dNO(x, mu=mod$mu, sigma=mod$sigma), col=4, lwd=5, add=TRUE)

然后你就可以自定义剧情了。

【讨论】：

【解决方案2】：

你可以试试：

histDist(data=abdom, y,
     family="NO",
     main="The y and the fitted NO distribution",
     xlab = "your choice",
     ylab = "Density",
     border.hist = "black",
     ylim=c(0,0.005), 
     col.main = "cyan", 
     col.axis = "brown", 
     col.lab = "green",
     fg.hist = "blue",
     line.ty = 1, 
     line.col = "red",
     col.hist = "pink")

getAnywhere(histDist) 将向您显示该函数，您可以添加一些额外的参数作为 cex.main=cex.main, ...

【讨论】：