从一周到今天答案

【问题标题】：from week of day to date从一周到今天
【发布时间】：2021-08-24 04:35:23
【问题描述】：

我有一个字符向量

x=c("Thu Jan 30 2020")

当我在base包中使用as.Date函数时，它返回NA。

as.Date(x,format="%a %b %d %Y")

我做错了什么？

【问题讨论】：

为我工作。检查您的语言环境：%a 和 %b 是特定于语言环境的。 Sys.getlocale() 的结果是什么（特别是 Sys.getlocale("LC_TIME") ？）
您需要将 R/R Studio 更改为英文。为此，请尝试 stackoverflow.com/questions/12760491/… 或 stackoverflow.com/questions/13575180/…
我得到了> Sys.getlocale("LC_TIME") [1] "Korean_Korea.949" 并通过 > Sys.setlocale("LC_ALL","English") 解决了非常感谢！跨度>

标签： r

【解决方案1】：

硬编码解决方法

s <- unlist(strsplit(x, " "))[c(4, 2, 3)]
as.Date(paste0(
  replace(
    s,
    2,
    sprintf("%02d", match(s[2], month.abb))
  ),
  collapse = "-"
))

【讨论】：