矢量化日期创建（带时区）

Question

x=c("2016-03-10 15:15:00", "2016-03-10 18:00:00", "2016-03-10 14:30:00")  
tz=c("Asia/Tokyo", "America/New_York", "America/New_York")

如何创建POSIXct日期向量（以矢量化方式）？

我试过（即使它不是一个正确的矢量化）

mapply(as.POSIXct, x=x, tz=tz)

但结果并不令人满意。 编辑：实际上mapply(as.POSIXct, x=x, tz=tz, SIMPLIFY = FALSE)返回正确的日期输出（它是向量转换失败的列表）。我仍在寻找避免mapply或以矢量化方式直接创建日期的好方法。