R/TSF_process.R

In kongdd/rTIMESAT: Extract Remote Sensing Vegetation Phenology by TIMESAT Fortran library

#' TSF_process
#'
#' @param file_set file path of TIMESAT setting file.
#' @param ncluster How many clusters to be used in parallel mode?
#' @param wait A logical (not NA) indicating whether the R interpreter should
#' wait for the command to finish, or run it asynchronously.
#' 
#' @export
#' 
#' @examples
#' \dontrun{
#' file_set <- system.file("example/ascii/TSM.set", package = "rTIMESAT")
#' TSF_process(file_set)
#' }
TSF_process <- function(file_set, ncluster = 1, wait = TRUE, cache = TRUE, verbose = FALSE){
    exe <- system.file("exec/TSF_process.exe", package = "rTIMESAT")
    cmd <- sprintf("%s %s %d", exe, file_set, ncluster)
    system(cmd, wait = wait, show.output.on.console = verbose)
}