how to use mondate(1)

mondate　ライブラリを準備する。

>library(mondate)

関数を準備する。mycalという名前にする。名前衝突に注意すること。

mycal <- function() {
    y2 <- readline("year(yyyy)? ")
    m  <- readline("month(mm)? ")
    g <- trunc(MonthsBetween(as.mondate(as.Date("2016-01-01")),as.mondate(as.Date(ISOdate(y2,m,01)))))
    print(g)

}