小编Viv*_*mar的帖子

我将图形输出从R导出到pdf文件.

我想将Sys.time()和Sys.Date()添加到outfile名称.

比如我有一个声明

pdf("output filename.pdf", 8,10)

我想输出看起来像输出 filename 2010-03-25 2pm.pdf

或类似的东西.

我有兴趣在 ggplot2 中制作一个像下面链接中那样的堆叠点图。

以下是使用包中的dotPlot函数制作的，BHH2但没有ggplot2.

我正在尝试转换以下内容，但在其中一个日期 [1] 上没有成功。“4/2/10”变成“0010-04-02”。

有没有办法纠正这个问题？

谢谢，维维克

data <- data.frame(initialDiagnose = c("4/2/10","14.01.2009", "9/22/2005", 
        "4/21/2010", "28.01.2010", "09.01.2009", "3/28/2005", 
        "04.01.2005", "04.01.2005", "Created on 9/17/2010", "03 01 2010"))

mdy <- mdy(data$initialDiagnose) 
dmy <- dmy(data$initialDiagnose) 
mdy[is.na(mdy)] <- dmy[is.na(mdy)] # some dates are ambiguous, here we give 
data$initialDiagnose <- mdy        # mdy precedence over dmy
data

   initialDiagnose
1       0010-04-02
2       2009-01-14
3       2005-09-22
4       2010-04-21
5       2010-01-28
6       2009-09-01
7       2005-03-28
8       2005-04-01
9       2005-04-01
10      2010-09-17
11      2010-03-01