Как найти корректировку летнего времени для заданной даты и часового пояса в R?

В PHP (начиная с версии 5.2.0) я могу написать такой код:

//$t is timestamp of day I want to look at
$tz=new DateTimeZone('America/New_York');
$transition = $tz->getTransitions($t,$t);
if(!$transition || count($transition)==0)throw new Exception("Bad timezone")
$offset=$transition[0]['offset'];   //This is seconds ahead of GMT.
      //I.e. -14400 in summer, -18000 in winter.

Я чуть не заплакал от радости, когда обнаружил этот класс/идиому; но есть ли способ сделать то же самое в R? Или мне придется прибегнуть к тому, что я делал в PHP, а именно, жестко закодировать массив дат начала/окончания летнего времени для каждого часового пояса, который мне нужно учитывать?

(BTW, подробнее о PHP-коде см: Как определить, переходит ли часовой пояс на летнее время в любое время года? )