Итак, у меня есть «календарь», который напоминает мне о некоторых вещах, которые необходимо выполнить в электронной таблице Excel, отправленной по электронной почте (MailR).Есть два столбца, один - дата, а другой - задача.Формат электронной таблицы выглядит следующим образом:
дата (дд / мм / гггг) |Задача
Это код, который я написал до сих пор:
library(zoo)
library(xts)
library(lubridate)
library(xtable)
setwd('Documents')
getwd()
data <- read.csv(file = 'email_calendar.csv', header = TRUE, sep = ',')
## NA values for blanks to match x(nrows)
data2 <- read.csv(file = 'email_calendar.csv', header = TRUE, sep = ',', na.strings = c('','NA'))
xtsdata <- xts(data2, order.by = as.Date(data2$Date),"%d/%m/%y")
body = print(xtable(data,caption = '30 Day Tasks'),type='html',caption.placement='top')
Однако вывод выглядит так:
Date (XTS) Date Task
0001-01-20 1/01/20 Road Trip
0001-10-19 1/10/19 Buy Groceries
0001-11-19 1/11/19 Meeting with manager
0002-01-20 2/01/20 NA
0002-03-20 2/03/20 Dentists
0002-10-19 2/10/19 NA
0002-12-19 2/12/19 Go to the Gym
0003-01-20 3/01/20 Buy Groceries
0003-02-20 3/02/20 Pick up kids
Я не могу отсортировать подата и когда я отправляю электронное письмо себе в качестве теста, даты полностью перемешаны.Я не могу понять, как совместить два типа дат вместе.
В окончательной версии мне бы хотелось, чтобы была заказанная дата, чтобы в электронном письме отображались только следующие 30 дней без исторических дат.
Может кто-нибудь пролить свет, спасибо?