안녕. 나는 이것이 고대라는 것을 알고 있지만 이 bce / bc 문제에 대해 생각하는 사람이 있습니까, 아니면 lubridate가 이제 이것을 기본적으로 처리합니까?

더 구체적으로 무엇이 문제인가. 사람들이 염두에 두고 있는 사용자 패턴은 무엇입니까?

나는 이것을 닫는다. 누군가 이 작업을 수행해야 하고 유용하다고 주장하면 다시 열어주세요.

글쎄, 내가 이것을 정기적으로 사용하는 것은 아니지만 음수 연도, 즉 BC가 포함된 데이터 세트에서 작업했으며 처리하는 데 상당한 어려움이 있었습니다. 예를 들어 다음은 작동하지 않습니다.

> lubridate::ymd("-2255-01-01")
[1] "2255-01-01"

> lubridate::parse_date_time(-2255, "Y")
[1] NA
Warning message:
All formats failed to parse. No formats found.

양수 연도가 있는 Date 개체가 반환되기 때문입니다. 즉, 다음이 작동합니다.

> lubridate::ymd("0000-01-01") - lubridate::years(2255)
[1] "-2255-01-01"

음수를 처리하는 도우미 함수를 작성하게 했습니다.

고대 시대(예: 그리스 및 로마 시대)에 대해 작업하는 모든 사람에게 이 기능이 매우 유용할 것임을 확인할 수 있습니다. 이 문제/선택은 현재 디지털 인문학 프로젝트 및 과정에서 R을 사용하는 Tidyverse 및 lubridate 애호가를 위한 거래 차단기입니다. 수정된 기능을 테스트해 보고 싶습니다.

안녕! 패키지와 작업에 감사드립니다. 누군가 BCE 날짜를 구현하거나 패키지를 있는 그대로 처리하는 것을 고려하는 경우(1.7.9), 팬텀 연도 0으로 인해 발생하는 문제에 대한 몇 가지 생각이 있습니다.

(존재하지 않음) "0년" 처리

설명

사람을 다루는 고려하면 lubridate의 날짜 "일반적인 시대 이전"올해 제로가 존재하지 않는 점에 유의 (내 말은 역사를 위해, 예를 들어, 참조, 다음 년도 -1과 1 년이 위키 백과의 연대기를 또한의주의 - 율리우스력의 경우 오늘날 우리가 사용하는 그레고리력과 약간의 충돌이 있을 수 있으며 이에 대한 자세한 내용은 Wikipedia에서 찾을 수 있습니다. 몇 가지 문제가 발생할 수 있습니다.

해당 표기법에 익숙하지 않은 사람들을 위한 빠른 설명:

• " CE "는 "Common Era"를 나타내며, 이는 오랫동안 사용된 "AD", "Anno Domini"의 "비기독교화"입니다(따라서 CE 날짜는 "긍정적인 해"로 볼 수 있음)
• " BCE "는 "Before Common Era"를 의미하며 "BC", "Before Christ"("음수 년")에 해당합니다.
  예를 들어 소크라테스는 기원전 399년에 사망했습니다.

예를 들어, lubridate는 0000-01-01 에서 시작하는 ISO 8601(버전 8601:2004로 추정합니까? BCE 날짜 는 ISO 8601:2019 로 처리 . , 즉 기원전 1년(-1년)의 1월 1일입니다.

이 생각하는 잎 때문에 쓰기는 혼란 " 0000-01-01 "올해 0, 그리고 "이다 -001-01-01 "-1 때의 년 -2 년이며, 계산 기간에 문제를 일으킬 수 있습니다 ( 아래 코드 ).

그 외에 "0 CE/AD" 또는 "0 BCE/BC"가 발생하면 아마도 -1년으로 구문 분석되어야 합니다.

참조: Wikipedia( ISO 8601 , 0 년 , 통용 시대 ...)

내 요점을 설명하는 몇 가지 코드

(WTFPL 라이선스: 원하는 대로 하세요)

pacman::p_load(lubridate)
pacman::p_version(lubridate)
#> [1] '1.7.9'

a <- ymd("0001-01-01")
a
#> [1] "0001-01-01"
# Year 1, no problem

b <- ymd("0000-01-01") - years(1)
b
#> [1] "-001-01-01"
# It is Year -1?
# No, it's -2 even if printed (-001-01-01),
# since ymd("0000-01-01") is already Year -1.

# The problem appears if we compute duration between the two
as.duration(a - b)
#> [1] "63158400s (~2 years)"
# But there is only one year between 1st January -1 and 1st January 1!
# since year zero doesn't exist.

아우구스투스 날짜를

• 출생: 기원전 63년 9월 23일
• 사망: 서기 14년 8월 19일
• 사망 연령: 75세

aug_birth <- ymd("0000-09-23") - years(63)
aug_death <- ymd("0014-08-19")
age <- aug_death - aug_birth
as.duration(age)
#> [1] "2426889600s (~76.9 years)"
# That's one year too much!

# The correct writing would be:
aug_birth <- ymd("0000-09-23") - years(63 - 1)

따라서 올바른 도우미 기능은 BCE yyyy-mm-dd를 구문 분석하는 것입니다.

parse_bce_ymd <- function(str) {
  regex <- "(\\d{4})(-\\d{2}-\\d{2})"
  match <- stringr::str_match(str, regex)
  years_n <- readr::parse_number(match[, 2]) - 1 # Beware the -1 here
  right_side <- match[, 3]
  date <- ymd(paste0("0000-",right_side)) - years(years_n)
  return(date)
}
# Test the function.
aug_birth <- parse_bce_ymd("0063-09-23")
aug_death <- ymd("0014-08-19")
age <- aug_death - aug_birth
as.duration(age)
#> [1] "2395353600s (~75.9 years)"
# Yay that's correct!

그래도 lubridate는 마치 0년이 존재하는 것처럼 BCE 날짜를 "실제 날짜"보다 1년 적게(절대값으로 더 적음, 여기서 1년 앞) 인쇄합니다. 이는 오해의 소지가 있습니다.

aug_birth
#> [1] "-062-09-23"

마지막 의견(그리고 디지털 인문학 프로젝트에서 R 및 Tidyverse 패키지의 광범위한 사용)을 고려할 때 @vspinu에서 문제가 다시 열릴 수 있다고 생각하십니까?