knitr::opts_chunk$set( collapse = TRUE, comment = "#>", fig.path = "man/figures/README-", out.width = "100%" )
English version of README is not available for now.
jcalendaR
はRで和暦と旧暦、西暦(ユリウス暦、(先発)グレゴリウス暦)の年月日を相互変換を行うためのパッケージです。
西暦(ユリウス暦、(先発)グレゴリウス暦)から旧暦への変換ができます。
年号を付与しない場合は旧暦は1年1月1日(先発グレゴリオ暦1年2月10日)から2100年12月1日(グレゴリウス暦2100年12月31日)までしか対応していません。
年号は、景行天皇以降(旧暦17年以降)の元号に対応してています。
旧暦の閏月は「閏」と「うるう」の両方の表記をサポートします。
改元の最初の年は「元年」と「1年」の両方の表記をサポートします。
和暦と旧暦は明治5年以前は一致します。
旧暦の暦法および、元号の表記および改元日は参照元データによるものです。
内部的に、ユリウス通日を計算しています。
リリース版はCRANからインストールできます。
install.package("jcalendaR")
開発版はGithubからインストールできます。
remotes::install_github("indenkun/jcalendaR")
library(jcalendaR)
wareki2seireki("令和3年1月1日") seireki2wareki("2021/1/1") wareki2seireki("天正6年3月13日", calendar = "julian") seireki2wareki("1578/4/18")
kyureki2seireki("令和3年1月1日") seireki2kyureki("2021/1/1")
wareki2kyureki("令和3年1月1日") kyureki2wareki("令和2年11月18日")
旧暦の指定した年に閏月があるかどうか、理論型か閏月の値で答えます。
指定する年の値は年号と数字で構成される必要があります。数字の後ろに年がついているかどうかは問いません。
existence_leap.month("明治2") existence_leap.month("明治2", existence = "number") existence_leap.month("明治3年", existence = "logical") existence_leap.month("明治3年", existence = "number")
旧暦の指定した年の指定した月が何日あるか。閏月を指定した場合、その年に閏月がないならその旨を警告文で出します。
指定する年の値は年号と数字で構成される必要があります。数字の後ろに年がついているかどうかは問いません。
また、指定する月は数値または文字列で、文字列の場合に数字の後ろに月がついているかどうかは問いません。
number_kyureki.month("明治2", 1) number_kyureki.month("明治2年", "閏1") number_kyureki.month("明治3", "閏10月")
jdn2calendar(2459216) calendar2jdn("2021/1/1")
seireki2wareki("1/1/1") wareki2seireki("天保2年2月30日") wareki2seireki("0年1月1日", era = "non") kyureki2seireki("2101年1月1日", era = "non")
ユリウス通日の計算にはユリウス通日 - Wikipediaの式を用いています。
グレゴリウス暦と旧暦の対照表、元号について以下のデータを参照しました。
MIT
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.