Каков вывод dput (head (prodapt))?

Question

Я использую функцию xts(), чтобы получить объект временного ряда. Я не могу понять формат моей переменной даты и времени?

Я хочу знать, как получить правильный объект временного ряда с точным форматированием, соответствующим моему исходному формату:

2019-01-01 00:00:00
2019-01-01 00:15:00
2019-01-01 00:30:00
2019-01-01 00:45:00
2019-01-01 01:00:00
2019-01-01 01:15:00

Я пробовал это:

prodapt$ts <- as.POSIXct(prodapt$ts, format = "%Y-%m-%d %H:%M:%S")
prodapt.ts.PmdAve.new <- xts(prodapt[,-1], order.by = prodapt$ts)

Я получаю представление о моих данных, как это.

X2019.01.01.00.00.00
X2019.01.01.00.00.00.1
X2019.01.01.00.00.00.2
X2019.01.01.00.00.00.3
X2019.01.01.00.00.00.4

.
.
.
.
X2019.01.01.00.00.00.28
X2019.01.01.00.00.00.29
X2019.01.01.00.15.00
X2019.01.01.00.15.00.1
X2019.01.01.00.15.00.2
X2019.01.01.00.15.00.3
X2019.01.01.00.15.00.4
X2019.01.01.00.15.00.5