R 无法将x轴设置为ggplot2中的日期

第一次海报，在R问题上潜伏了很久

我终于被难倒了48小时， 我要来到你们所有人的身边；但希望不会太久

我有一个不规则的时间序列，我正试图用ggplot 2来绘制。 我希望休息和标签只显示在我们有数据的日子

保存日期的变量以从excel中读取的因子开始，我将其转换为类日期：

Dataset[,BatchDateCol] <- as.Date(Dataset[,BatchDateCol],format="%m/%d/%y")

&

此命令绘制正确的分线和标签，但不打印

scale_x_continuous(labels=Date_Vec, 
limits=c(1,length(history[,BatchDateCol])), expand=c(.01,0)) 

当我仅用以下内容绘制它时：

scale_x_continuous(labels=Date_Vec, expand=c(.01,0)) 

它有时有效，但大多数时候我会：

缩放标签出错。连续缩放，主要：打断和标签长度不同

如果我不在scale_x_continuous中指定标签，我会得到自1970年以来的日期的数字形式或我想要的任何形式，尽管我不确定它是否绘制在正确的位置，但我也不知道如何修改它

最后，我尝试将scale_x_continuous更改为scale_x_date：

plot2 + scale_x_date(expand=c(.01,0))

这会返回一个错误：我尝试在

错误：无效输入：date_trans仅适用于类date的对象

我尝试将Dataset[，BatchDateCol]作为一个因子或字符向量，但这也不起作用

所以。。。。我完全不知所措，感到难以置信的失败：

编辑

ProductionDate是此处定义的带引号的变量：

---

QC_Processscale_x_continuousbreaks=uniquehistory$ProductionDate应该这样做，但我不能完全复制您的代码，因为我没有原始数据集，所以我无法测试此解决方案。

scale_x_continuousbreaks=uniquehistory$ProductionDate应该这样做，但我不能完全复制您的代码，因为我没有原始数据集，所以无法测试此解决方案。

通过设置

scale_x_continuous(labels=Date_Vec, Breaks=(as.numeric(history[,ProductionDate])))

仍然不知道为什么会这样，当我有连续的日期时，标签有时会重叠，

---

但这是进步

通过设置

scale_x_continuous(labels=Date_Vec, Breaks=(as.numeric(history[,ProductionDate])))

仍然不知道为什么会这样，当我有连续的日期时，标签有时会重叠，

---

但这是进步

很抱歉评论不完整，谢谢您的帮助！我在上面的代码中添加了一个编辑。我真的很感激您花时间处理不完全可复制的代码！很抱歉评论不完整，谢谢您的帮助！我在上面的代码中添加了一个编辑。我真的很感激您花时间处理不完全可复制的代码！不显示printhistory[ProductionDate]，而是显示dputhHistory，如果它有很多行，则显示dputhHeadHistory。请参阅，以了解有关生成可复制问题的其他提示。dputheadhistory的输出为：structurelistDate.of.Consumption=structurec15423157751583515841，class=Date，Sugars=c1.33333333，0，1，2.8，2.5，.Names=cDate.of.Consumption，Sugars，row.Names=cNA，6L，class=data.frame对不起，我又看了一眼，但我没有Dataset、BatchDateCol、Location、RawLocation、GGVar等，所以您的代码完全不可运行，也不可诊断。如果你能给出一个小的、可复制的例子，我来看看。不显示printhistory[ProductionDate]，而是显示dputhHistory，如果它有很多行，则显示dputhHeadHistory。请参阅，以了解有关生成可复制问题的其他提示。dputheadhistory的输出为：structurelistDate.of.Consumption=structurec15423157751583515841，class=Date，Sugars=c1.33333333，0，1，2.8，2.5，.Names=cDate.of.Consumption，Sugars，row.Names=cNA，6L，class=data.frame对不起，我又看了一眼，但我没有Dataset、BatchDateCol、Location、RawLocation、GGVar等，所以您的代码完全不可运行，也不可诊断。如果你能做一个小的和可复制的例子，我来看看。

scale_x_continuous(labels=Date_Vec, breaks=c(1:length(history[,BatchDateCol])),
limits=c(min(as.numeric(history[,BatchDateCol])),
max(as.numeric(history[,BatchDateCol]))))

scale_x_continuous(labels=Date_Vec, 
limits=c(1,length(history[,BatchDateCol])), expand=c(.01,0)) 

scale_x_continuous(labels=Date_Vec, expand=c(.01,0)) 

plot2 + scale_x_date(expand=c(.01,0))

scale_x_continuous(labels=Date_Vec, Breaks=(as.numeric(history[,ProductionDate])))