Получить время из индекса xts

У меня есть объект xts, x . Я хочу запустить цикл for до определенного времени, основанного на отметке времени в индексе.

> index(x)
[1] "2011-10-12 16:44:00 SAST"

Допустим, я хочу запустить цикл, пока время в индексе меньше, чем, скажем, 16:40:00. Как удалить компонент времени, учитывая формат указанного выше индекса?