Commit d646cffd authored by Romulo Pereira Goncalves's avatar Romulo Pereira Goncalves
Browse files

Merge branch 'fix_save_run' into 'master'

We are saving run1 object and not run.

See merge request !20
parents 2def921a daedb706
Pipeline #25384 passed with stages
in 11 minutes and 42 seconds
......@@ -493,9 +493,7 @@ multi_Class_Sampling <- function(in.raster,
if ( save_runs == TRUE) {
run1 <- maFo_rf
save_run(outPath,
ni,
run1)
save_run(outPath = outPath, step = ni, run1 = run1)
remove(run1)
}
......
......@@ -4,11 +4,11 @@
#'
#' @param outPath output path
#' @param step step number
#' @param run the object to be saved
#' @param run1 the object to be saved
#'
#' @export
save_run <- function(outPath, step, run) {
save(run, file = paste(outPath, paste("Run", step, sep = ""), sep = ""))
save_run <- function(outPath, step, run1) {
save(run1, file = paste(outPath, paste("Run", step, sep = ""), sep = ""))
}
#' Save Tif
......
......@@ -4,14 +4,14 @@
\alias{save_run}
\title{Save a run}
\usage{
save_run(outPath, step, run)
save_run(outPath, step, run1)
}
\arguments{
\item{outPath}{output path}
\item{step}{step number}
\item{run}{the object to be saved}
\item{run1}{the object to be saved}
}
\description{
Saves the run object for a step
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment