时区转换：无效'；tz'；值-R

我的目标是将“系统”时区转换为本地时区。我将所有相关时区保存在一列中，但它不起作用，请参见下面的示例（错误=无效的“tz”值）：

---

db问题在于
format
需要一个字符串类型，但需要给它一个向量

尝试以迭代方式进行格式化

库（purrr）
map2（df$date，df$tz，~format（.x，tz=.y））

   db<-data.table(c('Africa/Windhoek','Europe/Andorra','America/Chicago'), c('2017-12-31 17:04:00','2017-9-1 13:30:12','2017-12-15 21:33:13')) 
   names(db) = c('tz','date')
   db$date<- as.POSIXct(db$date, tz="Europe/London", format= c("%Y-%m-%d %H:%M:%OS"))

   db$original_time<-format(db$date, tz=db$tz)