R 格上直方图

因为基本R的

hist（）

不报告百分比（freq=FALSE）也没有帮助，所以我转向

lattice

histogram(rnorm(10000))

请帮我做以下几点：

我怎样才能摆脱情节周围的盒子

如何分别定义x/y标签和x/y轴的cex

如何为x轴和y轴提供自定义名称

---

这应该让你开始：

library(lattice)
histogram(rnorm(10000),     
    main=list(
        label="Main plot title",
        cex=1.5),
    xlab=list(
        label="Custom x-axis label",
        cex=0.75),
    ylab=list(
        label="My very own y-axis label",
        cex=1.2),
    scales=list(cex=0.5),
    par.settings = list(axis.line = list(col = 0))
)

---

或者，如果您想坚持使用

hist（）

，您可以稍微修改它，如下所示

此函数调用一次

hist（）

，以获取其返回值，该值是一个包含有关直方图结构的各种有用信息的对象。然后，它使用（a）料仓的宽度和（b）每个料仓的密度来计算（c）每个料仓中的观测值百分比

histPercent <- function(x, ...) {
   H <- hist(x, plot = FALSE)
   H$density <- with(H, 100 * density* diff(breaks)[1])
   plot(H, freq = FALSE, ...)
}

histPercent(rnorm(10000), col="dodgerblue", las=1,
            xlab="Echs-axis", ylab="Why-axis")

---

hist%出于好奇，你能详细说明一下你的
hist
有什么问题吗？当我指定
freq=FALSE
时，我得到一个密度（即百分比）直方图。要查看ECII可能指的问题，请尝试
hist（runif（1000），freq=FALSE，col=gray（.6））
。y轴确实正确地记录了概率密度，但每根棒的概率质量（密度乘以宽度的乘积）应该是密度的十分之一左右，因为有10根棒。。。所以我认为ECII要求的是轴刻度，该刻度表示每个条内的观察值百分比。太棒了。我以为用base是不可能的。然而，我必须把它交给安德烈，因为这个问题说明了晶格。非常感谢。@ECII——是的，我觉得很有趣，一个棒球队的名字硬连到了R。另外，谢谢你的提问。我不得不解释“为什么直方图中的百分比加起来不够”足够多次，我知道你是从哪里来的。啊，我现在明白你的意思了。