date.from <- as.character(today() - days(90))  #<------
date.to <- as.character(today() - days(1))     #<------
reportsuite.id = "tescoukgroceriesprod"
metrics <- c("bounces","entries","exits","pageViews","visits","uniquevisitors","orders","revenue","totalTimeSpent","cartAdditions","event50","event49","event58","event52","event51")
elements <- "eVar9"
report.data <- QueueTrended(reportsuite.id,date.from,date.to,metrics,elements)
report.data$datetime = as.character(report.data$datetime)  #<-------
write.Alteryx(report.data, 1)