The parameters for the built-in julian() are a bit different. This
should be what you can use:
start <- julian(as.Date(sprintf("%d-%d-%d", nn, mt1, 1)),
origin=as.Date("1971-01-01"))
end <- julian(as.Date(sprintf("%d-%d-%d", nn, mt2, 1)),
origin=as.Date("1971-01-01"))
Try looking at the julian() function in base ...
?julian
Jean
On Wed, Jun 10, 2015 at 2:46 AM, roslinazairimah zakaria <
roslina...@gmail.com> wrote:
> Dear r-users,
>
> I have a code in SPlus which use julian function. What is the similar code
> used in R?
>
> define.date1<-function(dt1,mt1,m
Dear r-users,
I have a code in SPlus which use julian function. What is the similar code
used in R?
define.date1<-function(dt1,mt1,mt2,nn,da)
{ mt2<-mt2+1
start<-julian(mt1, 1, nn, origin=c(month=1, day=1, year=1971))+1
end<-julian(mt2, 1, nn, origin=c(month=1, day=1, year=1971))+da
a<-dt1[start
3 matches
Mail list logo