如何在QCC Xbar图表中显示日期

Question

我有正在运行的qcc图表，但我想在控制图中显示值的真实日期，而不是显示值索引号

我遇到了以下帖子，但是无法将其应用于我的代码。 Adding line to plot in qcc Control Chart

下面是我的R QCC代码：

install.packages("qcc")
install.packages("ggQC")    
library(qcc)
library(ggQC)


date= seq(as.Date("2000/1/1"), by = "month", length.out = 20)
values = c( 
  2.92,    3.16,    2.88,    2.90,    2.92,
  2.94,    2.96,    2.98,    3.02,    2.67,
  3.09,    3.07,    3.04,    3.06,    3.05,
  3.03,    3.07,    2.91,    3.07,    3.30
)

exampl_data <- data.frame(ScrewID , values)
str(exampl_data)

qcc(exampl_data$values, type = "xbar.one", plot = True)

我希望qcc图表的x轴以“ jan-2019” / mmyy格式显示日期。

谢谢

Answer 1

可以通过提供labels参数将组标签添加到qcc图。

由于您没有共享ScrewID的内容，因此我以date作为第一个观察结果：

> exampl_data <- data.frame(date , values)
> exampl_data
         date values
1  2000-01-01   2.92
2  2000-02-01   3.16
3  ...

以下代码生成以下图：

qcc(exampl_data$values,
  labels = format(exampl_data$date, "%b-%Y"),
  type = "xbar.one")

（可选）使用axes.las来更改标签的文本方向（请注意，由于空间有限，我用xlab = ""删除了x轴标签）：

qcc(exampl_data$values,
  labels = format(exampl_data$date, "%b-%Y"),
  type = "xbar.one",
  axes.las = 2,
  xlab = "")