नमस्ते। मुझे पता है कि यह प्राचीन है, लेकिन क्या कोई इस बीसीई/बीसी मुद्दे के बारे में सोच रहा है, या लुब्रिडेट अब इसे मूल रूप से संभालता है?

अधिक ठोस समस्या क्या है। लोगों के मन में उपयोगकर्ता पैटर्न क्या है?

मैं इसे बंद कर रहा हूं। अगर कोई जोर देता है कि यह किया जाना चाहिए और उपयोगी है, तो कृपया फिर से खोलें।

ठीक है, ऐसा नहीं है कि मैं इसे नियमित रूप से उपयोग करता हूं, लेकिन मैंने सिर्फ एक डेटासेट पर काम किया है जिसमें नकारात्मक वर्ष यानी बीसी शामिल है और इससे निपटने में काफी कठिनाइयां थीं। जैसे निम्नलिखित काम नहीं करता है:

> 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.

चूंकि सकारात्मक वर्ष वाली दिनांक वस्तु वापस कर दी जाती है। उस ने कहा, निम्नलिखित कार्य करता है:

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

जिसने मुझे एक सहायक कार्य लिखा जो नकारात्मक वर्षों से संबंधित है।

मैं पुष्टि कर सकता हूं कि प्राचीन काल (जैसे ग्रीक और रोमन काल) पर काम करने वाले किसी भी व्यक्ति के लिए यह सुविधा बहुत उपयोगी होगी। यह समस्या/विकल्प वर्तमान में Tidyverse और lubridate उत्साही लोगों के लिए डिजिटल मानविकी परियोजनाओं और पाठ्यक्रमों में R का उपयोग करने के लिए एक डील ब्रेकर है। मुझे संशोधित कार्यों का परीक्षण करने में खुशी होगी।

नमस्ते! पैकेज और आसपास किए गए काम के लिए धन्यवाद। अगर कोई बीसीई तिथियों को लागू करने पर विचार करता है, या पैकेज के साथ (1.7.9) के साथ व्यवहार करता है, तो यहां एक प्रेत वर्ष शून्य के कारण होने वाली समस्याओं के बारे में कुछ विचार दिए गए हैं।

(गैर-मौजूदा) "वर्ष शून्य" से निपटना

स्पष्टीकरण

यदि कोई लुब्रिडेट में "सामान्य युग से पहले" तिथियों से निपटने पर विचार कर रहा है, तो ध्यान रखें कि वर्ष शून्य मौजूद नहीं है (इतिहासकारों के लिए मेरा मतलब है, वर्ष -1 और फिर वर्ष 1 है, उदाहरण के लिए विकिपीडिया कालक्रम देखें - यह भी ध्यान दें कि जूलियन कैलेंडर के लिए, जो आजकल हमारे द्वारा उपयोग किए जाने वाले ग्रेगोरियन कैलेंडर के साथ मामूली संघर्ष हो सकता है; आपको इसके बारे में अधिक विवरण विकिपीडिया पर मिलेगा), और इससे कुछ समस्याएं हो सकती हैं।

उन नोटेशन से अपरिचित लोगों के लिए त्वरित स्पष्टीकरण:

• " सीई " का अर्थ "कॉमन एरा" है, जो लंबे समय से "डी-क्रिश्चियनाइजेशन" है और अभी भी "एडी", "एनो डोमिनि" का उपयोग किया जाता है (इसलिए तिथियां सीई को "सकारात्मक वर्ष" के रूप में देखा जा सकता है)
• " बीसीई " का अर्थ "बिफोर कॉमन एरा", "बीसी", "बिफोर क्राइस्ट" ("नकारात्मक वर्ष") के बराबर है।
  उदाहरण के लिए 399 ईसा पूर्व में सुकरात की मृत्यु हो गई।

उदाहरण के लिए, लुब्रिडेट आईएसओ 8601 का अनुसरण करता है (संस्करण 8601:2004 मुझे लगता है? बीसीई तिथियों को आईएसओ 8601:2019 के साथ संभाला जा सकता है लेकिन दस्तावेज़ का फ्री-एक्सेस हिस्सा इसके बारे में स्पष्ट नहीं है), जो 0000-01-01 से शुरू होता है। , यानी 1 ईसा पूर्व (वर्ष -1) की पहली जनवरी।

यह लेखन भ्रमित करने वाला है क्योंकि यह सोचने के लिए छोड़ देता है कि " 0000-01-01 " वर्ष 0 है, और " -001-01-01 " वर्ष -1 है जब यह वर्ष -2 है, और अवधियों की गणना करने में समस्याएं पैदा कर सकता है ( देखें नीचे कोड )।

इसके अलावा, यदि सामना करना पड़ता है, तो "0 सीई/एडी" या "0 ईसा पूर्व/बीसी" शायद वर्ष -1 में पार्स किया जाना चाहिए।

सन्दर्भ: विकिपीडिया ( आईएसओ 8601 , वर्ष शून्य , 1 ईसा पूर्व , सामान्य युग ...)

मेरी बात बनाने के लिए कुछ कोड

(डब्ल्यूटीएफपीएल के तहत लाइसेंस प्राप्त: डू व्हाट द बकवास यू वांट टू वांट)

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.

आइए ऑगस्टस तिथियों के साथ उदाहरण दें:

• जन्म: 23 सितंबर 63 ई.पू
• मृत्यु: 19 अगस्त 14 सीई
• मृत्यु के समय आयु: 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)

तो बीसीई 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!

फिर भी, बीसीई की तारीख को "वास्तविक एक" की तुलना में एक वर्ष कम (पूर्ण मूल्य में कम, जो यहां एक वर्ष आगे है) के साथ लुब्रिडेट प्रिंट करें, जैसे कि एक शून्य-वर्ष मौजूद था, जो भ्रामक है।

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

पिछली टिप्पणियों (और डिजिटल मानविकी परियोजनाओं में आर और टिडाइवर्स पैकेज के व्यापक उपयोग) को देखते हुए, क्या आपको लगता है कि इस मुद्दे को फिर से खोला जा सकता है, @vspinu?