date_format Zeitzone Strangeness

Question

Ich habe ein Datum mit einer Zeitzone definiert, aber wenn ich es mit dem scales Paket date_format ausdruck, gibt es mir die Zeit in UTC, was für meinen Zweck peinlich ist.

> library(scales) 
> st <- as.POSIXct("2015-10-31 00:00:00",tz="US/Pacific") 
> st 
[1] "2015-10-31 PDT" 
> fmt <- date_format("%Y-%m-%d %R %Z") 
> fmt(st) 
[1] "2015-10-31 07:00 UTC" 

Interessanter das funktioniert (so POSIXct die Zeitzone zu verstehen scheint) - aber gibt mir nicht genug Kontrolle über das Format:

> format(st,usetz=T) 
[1] "2015-10-31 PDT" 

Diese Unzuverlässigkeit bei der Hilfe für ?date_format angedeutet wird:

Wenn% z oder% Z für die Ausgabe mit einem Objekt mit einer zugewiesenen Zeitzone verwendet wird, wird versucht, die Werte für diese Zeitzone zu verwenden - b ut es ist nicht garantiert, um erfolgreich zu sein.

Also meine Frage ist, wie mache ich machen es gelingt?

Vorschlagen von Workarounds ist in Ordnung und kann upvotes kontaktieren, aber bitte verstehen Sie den Punkt dieser Frage ist, dass ich einen Einblick erhalten möchte, was mit date_format vor sich geht.

Answer 1

Die Definition von date_format ist sehr kurz:

function (format = "%Y-%m-%d", tz = "UTC") 
{ 
    function(x) format(x, format, tz = tz) 
} 

Es sollte klar sein, warum die Zeitzone geändert wird, wenn Sie den Standard nicht ändern.