输出打印正在剪切或不在正确的帧中

Question

在r中绘制用于eda分析的hist+密度图时，输出图不能正确地拟合到框架中

  hist(Absenteeism_Data$Absenteeism.time.in.hours, col = "peachpuff", border = "black", prob = TRUE, xlab = "Absenteeism.time.in.hour", main = "Absenteeism_Data")
    lines(density(Absenteeism_Data$Absenteeism.time.in.hours, na.rm = TRUE), lwd = 2, col = "chocolate3")

Answer 1

由于您没有提供示例供我们使用，因此我将使用一些内置数据进行演示。我可以使用iris数据复制您遇到的问题类型

hist(iris$Sepal.Width, col = "peachpuff", border = "black", 
    prob = TRUE, xlab = "Sepal.Width", main = "Iris Data", breaks=5)
lines(density(iris$Sepal.Width, na.rm = TRUE), lwd = 2, col = "chocolate3")

问题是R在生成直方图时决定y值的范围。它不知道你的计划密度图。所以你必须告诉它留有足够的空间。可以通过先运行“密度”（density）并找到所需的最大值来实现

DENS = density(iris$Sepal.Width, na.rm = TRUE)
YMax = max(DENS$y)
hist(iris$Sepal.Width, col = "peachpuff", border = "black", ylim=c(0,YMax),
    prob = TRUE, xlab = "Sepal.Width", main = "Iris Data", breaks=5)
lines(DENS, lwd = 2, col = "chocolate3")