R/latest.R

`latest` <-
function(x)as.character(
  tapply(
    x,
    INDEX=dirname(dirname(x)),
    FUN=function(group)rev(sort(group))[[1]]
  )
)

Try the metrumrg package in your browser

Any scripts or data that you put into this service are public.

metrumrg documentation built on May 2, 2019, 5:55 p.m.