R ggplot2具有不同時間格式的情節列表 - 是一個錯誤？

Question

我想在x ax上生成帶有不同時間格式標籤的ggplot2圖表列表。然而格式參數沒有按照ggplot的預期進行考慮。 這是可以重現問題的最小代碼。

x<-as.POSIXct(strptime(c("2013-01-01 00:00:00","2013-01-02 00:00:00"),format="%Y-%m-%d %H:%M:%S")) 
y1<-c(0,1) 
y2<-c(0,-1) 
df<-data.frame(x=x,y1=y1,y2=y2) 
f<-function(a,b){ggplot(df,aes_string(x="x",y=b))+geom_line()+ scale_x_datetime(labels= date_format(a))} 
r<-mapply(f,c("%b-%d","%H:%M"),c("y1","y2"),SIMPLIFY=FALSE) 

r[2]給出了預期的情節（抱歉，我不能張貼圖片），但r[1]軸格式不正確（而要繪製的數據被正確地考慮到）。

有什麼建議嗎？

Answer 1

ggplot環境和mapply和承諾的評價之間，a沒有被適當的評價，你可以避開這個由force功能

如

f<-function(a,b){ 
    a <- force(a) 
    ggplot(df,aes_string(x="x",y=b))+geom_line()+ scale_x_datetime(labels= date_format(a)) 
} 
r <- mapply(f,c("%b-%d","%H:%M"),c("y1","y2"), SIMPLIFY = FALSE) 

r[1] 

r[2] 

內荷蘭國際集團它

Explain a lazy evaluation quirk更詳細地解釋了懶惰的評估。