make.btrack.alldates:

In galuardi/hmmwoa: bones of a hidden markov model for psat data

Usage

make.btrack.alldates(track, psat)

Arguments

track
psat

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (track, psat) 
{
    require(date)
    alldates = seq(psat$day0, psat$dayT)
    alldates.dmy = date.mdy(alldates)
    alldates.dmy = cbind(alldates.dmy[[2]], alldates.dmy[[1]], 
        alldates.dmy[[3]])
    bdates = mdy.date(track[, 2], track[, 3], track[, 1])
    bidx = match(bdates, alldates)
    output = as.data.frame(matrix(NA, nrow = length(alldates), 
        ncol = ncol(track)))
    names(output) = names(track)
    output[, 1:3] = alldates.dmy
    output[bidx, 4:ncol(track)] = track[, 4:ncol(track)]
    output
  }

galuardi/hmmwoa documentation built on May 16, 2019, 5:37 p.m.