[Stacomir-commits] r384 - in pkg/stacomir: R inst/examples inst/tests/testthat man
noreply at r-forge.r-project.org
noreply at r-forge.r-project.org
Thu Jun 8 09:43:14 CEST 2017
Author: briand
Date: 2017-06-08 09:43:13 +0200 (Thu, 08 Jun 2017)
New Revision: 384
Modified:
pkg/stacomir/R/BilanMigrationMult.r
pkg/stacomir/R/BilanMigrationMultConditionEnv.r
pkg/stacomir/inst/examples/bilanAnnuels_example.R
pkg/stacomir/inst/tests/testthat/test-00stacomir.R
pkg/stacomir/inst/tests/testthat/test-01BilanMigrationMult.R
pkg/stacomir/inst/tests/testthat/test-10BilanConditionEnv.R
pkg/stacomir/inst/tests/testthat/test-11BilanMigrationMultConditionEnv.R
pkg/stacomir/inst/tests/testthat/test-12BilanMigrationCar.R
pkg/stacomir/man/BilanAnnuels-class.Rd
pkg/stacomir/man/calcule-BilanMigrationMultConditionEnv-method.Rd
pkg/stacomir/man/charge-BilanMigrationMultConditionEnv-method.Rd
pkg/stacomir/man/choice_c-BilanMigrationMult-method.Rd
Log:
building test scripts
Modified: pkg/stacomir/R/BilanMigrationMult.r
===================================================================
--- pkg/stacomir/R/BilanMigrationMult.r 2017-06-07 09:58:58 UTC (rev 383)
+++ pkg/stacomir/R/BilanMigrationMult.r 2017-06-08 07:43:13 UTC (rev 384)
@@ -144,11 +144,12 @@
#' @param stades A stage code matching the ref.tr_stadedeveloppement_std table in the stacomi database see \link{choice_c,RefStades-method}
#' @param datedebut The starting date as a character, formats like \code{\%Y-\%m-\%d} or \code{\%d-\%m-\%Y} can be used as input
#' @param datefin The finishing date of the Bilan, for this class this will be used to calculate the number of daily steps.
+#' @param silent Should messages be hided default FALSE
#' @return An object of class \link{BilanMigrationMult-class}
#' @author Cedric Briand \email{cedric.briand"at"eptb-vilaine.fr}
#' @export
setMethod("choice_c",signature=signature("BilanMigrationMult"),definition=function(object,
- dc,taxons,stades,datedebut,datefin){
+ dc,taxons,stades,datedebut,datefin,silent=FALSE){
bilanMigrationMult<-object
bilanFonctionnementDF=new("BilanFonctionnementDF")
assign("bilanFonctionnementDF",bilanFonctionnementDF,envir = envir_stacomi)
@@ -166,7 +167,7 @@
bilanMigrationMult at stades<-choice_c(bilanMigrationMult at stades,stades)
bilanMigrationMult at pasDeTemps<-choice_c(bilanMigrationMult at pasDeTemps,datedebut,datefin)
assign("bilanMigrationMult",bilanMigrationMult,envir = envir_stacomi)
-
+ if (! silent) funout(gettext("Choice made, and object bilanMigrationMult assigned in envir_stacomi"),domain="R-stacomiR")
return(bilanMigrationMult)
})
@@ -185,9 +186,7 @@
setMethod("calcule",signature=signature("BilanMigrationMult"),definition=function(object,negative=FALSE,silent=FALSE){
# bilanMigrationMult<-bMM_Arzal
if (!silent) funout(gettext("Starting migration summary ... be patient\n",domain="R-stacomiR"))
- bilanMigrationMult<-object
-
-
+ bilanMigrationMult<-object
debut=bilanMigrationMult at pasDeTemps@dateDebut
fin=DateFin(bilanMigrationMult at pasDeTemps)
time.sequence<-seq.POSIXt(from=debut,to=fin,
Modified: pkg/stacomir/R/BilanMigrationMultConditionEnv.r
===================================================================
--- pkg/stacomir/R/BilanMigrationMultConditionEnv.r 2017-06-07 09:58:58 UTC (rev 383)
+++ pkg/stacomir/R/BilanMigrationMultConditionEnv.r 2017-06-08 07:43:13 UTC (rev 384)
@@ -95,7 +95,7 @@
#' @param silent Should the function remain silent (boolean)
#' @author Cedric Briand \email{cedric.briand"at"eptb-vilaine.fr}
#' @export
-setMethod("charge",signature=signature("BilanMigrationMultConditionEnv"),definition=function(object,silent) {
+setMethod("charge",signature=signature("BilanMigrationMultConditionEnv"),definition=function(object,silent=FALSE) {
# silent=FALSE
bmmCE<-object
bmmCE at bilanMigrationMult<-charge(bmmCE at bilanMigrationMult,silent=silent)
@@ -126,11 +126,11 @@
#' @param silent Boolean default FALSE, if TRUE information messages not displayed
#' @return \code{\link{BilanMigrationMultConditionEnv-class}}
#' @export
-setMethod("calcule",signature=signature("BilanMigrationMultConditionEnv"),definition=function(object,silent){
+setMethod("calcule",signature=signature("BilanMigrationMultConditionEnv"),definition=function(object,silent=FALSE){
# silent=FALSE
bmmCE<-object
bmmCE at bilanMigrationMult<-calcule(bmmCE at bilanMigrationMult)
- funout(gettext("bmmCE object is stocked into envir_stacomi environment\n",domain="R-stacomiR"))
+ if (!silent) funout(gettext("bmmCE object is stocked into envir_stacomi environment\n",domain="R-stacomiR"))
return(bmmCE)
})
@@ -152,7 +152,8 @@
#' @author Cedric Briand \email{cedric.briand"at"eptb-vilaine.fr}
#' @aliases plot.BilanMigrationMultConditionEnv plot.bmmCE
#' @export
-setMethod("plot", signature(x = "BilanMigrationMultConditionEnv", y = "missing"), definition=function(x, color_station=NULL,color_dc=NULL, silent=FALSE){
+setMethod("plot", signature(x = "BilanMigrationMultConditionEnv", y = "missing"),
+ definition=function(x, color_station=NULL,color_dc=NULL, silent=FALSE){
#color_station=NULL;color_dc=NULL
# color_station<-c("temp_gabion"="red","coef_maree"="blue","phases_lune"="green")
# color_dc=c("5"="#4D4D4D","6"="#E6E6E6","12"="#AEAEAE")
@@ -281,7 +282,7 @@
theme_bw()
print(g)
assign("g",g,envir_stacomi)
- funout(gettext("the ggplot object has been assigned to envir_stacomi, type g<-get('g',envir_stacomi)"))
+ if (!silent) funout(gettext("the ggplot object has been assigned to envir_stacomi, type g<-get('g',envir_stacomi)"))
})# end function
Modified: pkg/stacomir/inst/examples/bilanAnnuels_example.R
===================================================================
--- pkg/stacomir/inst/examples/bilanAnnuels_example.R 2017-06-07 09:58:58 UTC (rev 383)
+++ pkg/stacomir/inst/examples/bilanAnnuels_example.R 2017-06-08 07:43:13 UTC (rev 384)
@@ -63,4 +63,4 @@
beside=TRUE)
}
plot(bilAM)
-}
\ No newline at end of file
+}
Modified: pkg/stacomir/inst/tests/testthat/test-00stacomir.R
===================================================================
--- pkg/stacomir/inst/tests/testthat/test-00stacomir.R 2017-06-07 09:58:58 UTC (rev 383)
+++ pkg/stacomir/inst/tests/testthat/test-00stacomir.R 2017-06-08 07:43:13 UTC (rev 384)
@@ -84,6 +84,7 @@
require(stacomiR)
stacomi(gr_interface=TRUE,login_window=TRUE,database_expected=TRUE)
expect_true(exists("logw",envir_stacomi))
+ dispose(get("logw",envir_stacomi))
rm("envir_stacomi",envir =.GlobalEnv)
})
Modified: pkg/stacomir/inst/tests/testthat/test-01BilanMigrationMult.R
===================================================================
--- pkg/stacomir/inst/tests/testthat/test-01BilanMigrationMult.R 2017-06-07 09:58:58 UTC (rev 383)
+++ pkg/stacomir/inst/tests/testthat/test-01BilanMigrationMult.R 2017-06-08 07:43:13 UTC (rev 384)
@@ -5,15 +5,16 @@
bilanMigrationMult<-new("BilanMigrationMult")
#options(warn = -1)
bilanMigrationMult<-suppressWarnings(choice_c(bilanMigrationMult,
- dc=c(6,7),
- taxons=c("Anguilla anguilla","Salmo salar"),
- stades=c("AGG","AGJ","CIV"),
- datedebut="2012-01-01",
- datefin="2012-12-31"))
+ dc=c(6,7),
+ taxons=c("Anguilla anguilla","Salmo salar"),
+ stades=c("AGG","AGJ","CIV"),
+ datedebut="2012-01-01",
+ datefin="2012-12-31",
+ silent=TRUE))
#options(warn = 0)
expect_s4_class(bilanMigrationMult,
"BilanMigrationMult")
- rm(list=ls(envir=envir_stacomi),envir=envir_stacomi)
+ rm(list=ls(envir=envir_stacomi),envir=envir_stacomi)
})
## This test check that the code above works with numeric and a different formating for date
@@ -23,15 +24,16 @@
bilanMigrationMult<-new("BilanMigrationMult")
#options(warn = -1)
bilanMigrationMult<-suppressWarnings(choice_c(bilanMigrationMult,
- dc=c(6,7),
- taxons=c(2038,2220),
- stades=c("AGG","AGJ","CIV"),
- datedebut="2012-01-01",
- datefin="31/12/2012"))
+ dc=c(6,7),
+ taxons=c(2038,2220),
+ stades=c("AGG","AGJ","CIV"),
+ datedebut="2012-01-01",
+ datefin="31/12/2012",
+ silent=TRUE))
#options(warn = 0)
expect_s4_class(bilanMigrationMult,
"BilanMigrationMult")
- rm(list=ls(envir=envir_stacomi),envir=envir_stacomi)
+ rm(list=ls(envir=envir_stacomi),envir=envir_stacomi)
})
test_that("Tests one instance with error (dc does not exist)",
{
@@ -44,14 +46,15 @@
taxons=c("Anguilla anguilla","Salmo salar"),
stades=c("AGG","AGJ","CIV"),
datedebut="2012-01-01",
- datefin="31/12/2012"))
+ datefin="31/12/2012",
+ silent=TRUE))
options(warn = 0)
- rm(list=ls(envir=envir_stacomi),envir=envir_stacomi)
+ rm(list=ls(envir=envir_stacomi),envir=envir_stacomi)
})
test_that("Test charge method for bilanMigrationMult",
{
-
+
require(stacomiR)
stacomi(gr_interface=FALSE,login_window=FALSE,database_expected=FALSE)
bilanMigrationMult<-new("BilanMigrationMult")
@@ -61,37 +64,39 @@
taxons=c(2038),
stades=c("AGG","AGJ","CIV"),
datedebut="2012-01-01",
- datefin="31/12/2012")
+ datefin="31/12/2012",
+ silent=TRUE)
options(warn = 0)
bilanMigrationMult<-charge(bilanMigrationMult,silent=TRUE)
- })
+ })
- test_that("Test connect method for bilanMigrationMult",
- {
- require(stacomiR)
- stacomi(gr_interface=FALSE,login_window=FALSE,database_expected=FALSE)
- bilanMigrationMult<-new("BilanMigrationMult")
- options(warn = -1)
- bilanMigrationMult<-choice_c(bilanMigrationMult,
- dc=c(6,7),
- taxons=c(2038),
- stades=c("AGG","AGJ","CIV"),
- datedebut="2012-01-01",
- datefin="31/12/2012")
- options(warn = 0)
- bilanMigrationMult<-charge(bilanMigrationMult,silent=TRUE)
- bilanMigrationMult<-connect(bilanMigrationMult,silent=TRUE)
- expect_gt(nrow(bilanMigrationMult at data),0)
- bilanOperation<-get("bilanOperation",envir=envir_stacomi)
- expect_gt(nrow(bilanOperation at data),0)
- bilanFonctionnementDF<-get("bilanFonctionnementDF",envir=envir_stacomi)
- expect_gt(nrow(bilanFonctionnementDF at data),0)
- bilanFonctionnementDC<-get("bilanFonctionnementDC",envir=envir_stacomi)
- expect_gt(nrow(bilanFonctionnementDC at data),0)
- rm(list=ls(envir=envir_stacomi),envir=envir_stacomi)
- })
-
+test_that("Test connect method for bilanMigrationMult",
+ {
+ require(stacomiR)
+ stacomi(gr_interface=FALSE,login_window=FALSE,database_expected=FALSE)
+ bilanMigrationMult<-new("BilanMigrationMult")
+ options(warn = -1)
+ bilanMigrationMult<-choice_c(bilanMigrationMult,
+ dc=c(6,7),
+ taxons=c(2038),
+ stades=c("AGG","AGJ","CIV"),
+ datedebut="2012-01-01",
+ datefin="31/12/2012",
+ silent=TRUE)
+ options(warn = 0)
+ bilanMigrationMult<-charge(bilanMigrationMult,silent=TRUE)
+ bilanMigrationMult<-connect(bilanMigrationMult,silent=TRUE)
+ expect_gt(nrow(bilanMigrationMult at data),0)
+ bilanOperation<-get("bilanOperation",envir=envir_stacomi)
+ expect_gt(nrow(bilanOperation at data),0)
+ bilanFonctionnementDF<-get("bilanFonctionnementDF",envir=envir_stacomi)
+ expect_gt(nrow(bilanFonctionnementDF at data),0)
+ bilanFonctionnementDC<-get("bilanFonctionnementDC",envir=envir_stacomi)
+ expect_gt(nrow(bilanFonctionnementDC at data),0)
+ rm(list=ls(envir=envir_stacomi),envir=envir_stacomi)
+ })
+
test_that("Test example 01_BilanMigrationMult",
{
# check if built with examples (Rtools install --example
@@ -99,8 +104,8 @@
test<-file.access(example_path,0)
if (test[1]!=0) warnings("Package example dir not created ?") else
options(warn = -1)
- source(example_path)
- options(warn = 0)
+ source(example_path)
+ options(warn = 0)
summary(bMM_Arzal,silent=TRUE)
})
Modified: pkg/stacomir/inst/tests/testthat/test-10BilanConditionEnv.R
===================================================================
--- pkg/stacomir/inst/tests/testthat/test-10BilanConditionEnv.R 2017-06-07 09:58:58 UTC (rev 383)
+++ pkg/stacomir/inst/tests/testthat/test-10BilanConditionEnv.R 2017-06-08 07:43:13 UTC (rev 384)
@@ -1,6 +1,32 @@
-#
-# Author: cedric.briand
-###############################################################################
+context("BilanConditionEnv")
+test_that("test creating an instance of BilanConditionEnv",{
+ require(stacomiR)
+ stacomi(gr_interface=FALSE,login_window=FALSE,database_expected=TRUE)
+ bil_CE<-new("BilanConditionEnv")
+ bil_CE<-choice_c(bil_CE,
+ stationMesure=c("temp_gabion","coef_maree"),
+ datedebut="2008-01-01",
+ datefin="2008-12-31",
+ silent=TRUE)
+ bil_CE<-connect(bil_CE,silent=TRUE)
+ expect_true(nrow(bil_CE at data)>0,"The is a problem when loading data in the data slot" )
+ rm("envir_stacomi",envir =.GlobalEnv)
+ })
+test_that("test plot method",{
+ require(stacomiR)
+ stacomi(gr_interface=FALSE,login_window=FALSE,database_expected=TRUE)
+ bil_CE<-new("BilanConditionEnv")
+ bil_CE<-choice_c(bil_CE,
+ stationMesure=c("temp_gabion","coef_maree"),
+ datedebut="2008-01-01",
+ datefin="2008-12-31",
+ silent=TRUE)
+ bil_CE<-connect(bil_CE,silent=TRUE)
+ bil_CE<-plot(bil_CE)
+ rm("envir_stacomi",envir =.GlobalEnv)
+ })
+
+
Modified: pkg/stacomir/inst/tests/testthat/test-11BilanMigrationMultConditionEnv.R
===================================================================
--- pkg/stacomir/inst/tests/testthat/test-11BilanMigrationMultConditionEnv.R 2017-06-07 09:58:58 UTC (rev 383)
+++ pkg/stacomir/inst/tests/testthat/test-11BilanMigrationMultConditionEnv.R 2017-06-08 07:43:13 UTC (rev 384)
@@ -1,6 +1,49 @@
-#
-# Author: cedric.briand
-###############################################################################
+context("BilanMigrationMultConditionEnv")
+test_that("test creating an instance of BilanMigrationMultConditionEnv",{
+ require(stacomiR)
+ stacomi(gr_interface=FALSE,login_window=FALSE,database_expected=TRUE)
+ bmmCE<-new("BilanMigrationMultConditionEnv")
+ bmmCE<-choice_c(bmmCE,
+ dc=c(5,6,12),
+ taxon=c("Anguilla anguilla"),
+ stade=c("AGJ","AGG","CIV"),
+ stationMesure=c("temp_gabion","coef_maree","phases_lune"),
+ datedebut="2008-01-01",
+ datefin="2008-12-31",
+ silent=TRUE)
+ bmmCE<-charge(bmmCE,silent=TRUE)
+ bmmCE<-connect(bmmCE,silent=TRUE)
+ expect_true(nrow(bmmCE at bilanConditionEnv@data)>0,"Data not loaded in the bilanConditionEnv part of the object" )
+ expect_true(nrow(bmmCE at bilanMigrationMult@data)>0,"Data not loaded in the bilanMigrationMult part of the object" )
+ rm("envir_stacomi",envir =.GlobalEnv)
+ })
+test_that("test plot method",{
+ require(stacomiR)
+ stacomi(gr_interface=FALSE,login_window=FALSE,database_expected=TRUE)
+ bmmCE<-new("BilanMigrationMultConditionEnv")
+ bmmCE<-choice_c(bmmCE,
+ dc=c(5,6,12),
+ taxon=c("Anguilla anguilla"),
+ stade=c("AGJ","AGG","CIV"),
+ stationMesure=c("temp_gabion","coef_maree","phases_lune"),
+ datedebut="2008-01-01",
+ datefin="2008-12-31",
+ silent=TRUE)
+ bmmCE<-charge(bmmCE,silent=TRUE)
+ bmmCE<-connect(bmmCE,silent=TRUE)
+ bmmCE<-calcule(bmmCE,silent=TRUE)
+ suppressWarnings(plot(bmmCE))
+ suppressWarnings(plot(bmmCE,
+ color_station=c("temp_gabion"="red","coef_maree"="blue","phases_lune"="pink"),
+ color_dc=c("5"="yellow","6"="orange","12"="purple")))
+ rm("envir_stacomi",envir =.GlobalEnv)
+ })
+
+
+
+
+
+
Modified: pkg/stacomir/inst/tests/testthat/test-12BilanMigrationCar.R
===================================================================
--- pkg/stacomir/inst/tests/testthat/test-12BilanMigrationCar.R 2017-06-07 09:58:58 UTC (rev 383)
+++ pkg/stacomir/inst/tests/testthat/test-12BilanMigrationCar.R 2017-06-08 07:43:13 UTC (rev 384)
@@ -4,7 +4,7 @@
test_that("test creating an instance of BilanMigrationCar and connect method (logrami required)",{
require(stacomiR)
stacomi(gr_interface=FALSE,login_window=FALSE,database_expected=TRUE)
- # overriding user schema to point to iav
+ # overriding user schema to point to logrami
assign("sch","logrami.",envir_stacomi)
bmC<-new("BilanMigrationCar")
baseODBC<-get("baseODBC",envir=envir_stacomi)
@@ -22,7 +22,7 @@
parqual=NULL,
horodatedebut="2009-01-01",
horodatefin="2012-12-31",
- silent=FALSE)
+ silent=TRUE)
# bmC<-charge(bmC) not necessary there
bmC<-connect(bmC)
expect_true(is.null(bmC at data$parqual),label="there should be no data in parqual when not qualitative parm are selected")
@@ -51,11 +51,15 @@
parqual=NULL,
horodatedebut="2009-01-01",
horodatefin="2012-12-31",
- silent=FALSE)
+ silent=TRUE)
# bmC<-charge(bmC) not necessary there
- bmC<-connect(bmC)
+ bmC<-connect(bmC,silent=TRUE)
# load the dataset generated by previous lines
- bmC<-setasqualitative(bmC,par='A124',silent=FALSE,breaks=c(0,1.5,2.5,10),label=c("age 1","age 2","age 3"))
+ bmC<-setasqualitative(bmC,
+ par='A124',
+ silent=TRUE,
+ breaks=c(0,1.5,2.5,10),
+ label=c("age 1","age 2","age 3"))
expect_true(bmC at parqual@par_selectionne=='A124', label="Test passing quant parm A124 to qualitative failed")
expect_false(bmC at parquan@par_selectionne=='A124', label="The parameter A124 should have been removed from quant parm")
expect_true('A124'%in%bmC at data$parqual$car_par_code)
@@ -83,15 +87,17 @@
parqual=NULL,
horodatedebut="2012-01-01",
horodatefin="2012-12-31",
- silent=FALSE)
+ silent=TRUE)
bmC<-connect(bmC)
- bmC<-calcule(bmC)
+ bmC<-calcule(bmC,silent=TRUE)
expect_true(nrow(bmC at calcdata)>0, label="Test that calcule method worked")
expect_true(all(is.na(bmC at calcdata$car_par_code_qual)), label="Test that calcule method does not return any qualitative result in absence of qualitative parm")
# now with a qualitative parm
- bmC<-setasqualitative(bmC,par='A124',silent=FALSE,breaks=c(0,1.5,2.5,10),label=c("age 1","age 2","age 3"))
- bmC<-calcule(bmC)
+ bmC<-setasqualitative(bmC,
+ par='A124',
+ silent=TRUE,breaks=c(0,1.5,2.5,10),label=c("age 1","age 2","age 3"))
+ bmC<-calcule(bmC,silent=TRUE)
expect_true(any(!is.na(bmC at calcdata$car_par_code_qual))&any(!is.na(bmC at calcdata$car_par_code_quan)), label="The merge function works and returns both qualitative and quantitative parameters")
rm("envir_stacomi",envir =.GlobalEnv)
Modified: pkg/stacomir/man/BilanAnnuels-class.Rd
===================================================================
--- pkg/stacomir/man/BilanAnnuels-class.Rd 2017-06-07 09:58:58 UTC (rev 383)
+++ pkg/stacomir/man/BilanAnnuels-class.Rd 2017-06-08 07:43:13 UTC (rev 384)
@@ -48,7 +48,6 @@
}
# the following dataset has been generated by the previous code
data(bilA)
-(bilA)
xtbilA<-xtable(bilA,
dc_name=c("Passe bassins","Piege anguille RG","Piege anguille RD"),
tax_name="Anguille",
Modified: pkg/stacomir/man/calcule-BilanMigrationMultConditionEnv-method.Rd
===================================================================
--- pkg/stacomir/man/calcule-BilanMigrationMultConditionEnv-method.Rd 2017-06-07 09:58:58 UTC (rev 383)
+++ pkg/stacomir/man/calcule-BilanMigrationMultConditionEnv-method.Rd 2017-06-08 07:43:13 UTC (rev 384)
@@ -5,7 +5,7 @@
\alias{calcule,BilanMigrationMultConditionEnv-method}
\title{Calculation for the BilanMigrationMultConditionEnv}
\usage{
-\S4method{calcule}{BilanMigrationMultConditionEnv}(object, silent)
+\S4method{calcule}{BilanMigrationMultConditionEnv}(object, silent = FALSE)
}
\arguments{
\item{object}{An object of class \code{\link{BilanMigrationMultConditionEnv-class}}}
Modified: pkg/stacomir/man/charge-BilanMigrationMultConditionEnv-method.Rd
===================================================================
--- pkg/stacomir/man/charge-BilanMigrationMultConditionEnv-method.Rd 2017-06-07 09:58:58 UTC (rev 383)
+++ pkg/stacomir/man/charge-BilanMigrationMultConditionEnv-method.Rd 2017-06-08 07:43:13 UTC (rev 384)
@@ -5,7 +5,7 @@
\alias{charge,BilanMigrationMultConditionEnv-method}
\title{charge method for BilanMigrationMultConditionEnv class}
\usage{
-\S4method{charge}{BilanMigrationMultConditionEnv}(object, silent)
+\S4method{charge}{BilanMigrationMultConditionEnv}(object, silent = FALSE)
}
\arguments{
\item{object}{An object of class \link{BilanMigrationMultConditionEnv-class}}
Modified: pkg/stacomir/man/choice_c-BilanMigrationMult-method.Rd
===================================================================
--- pkg/stacomir/man/choice_c-BilanMigrationMult-method.Rd 2017-06-07 09:58:58 UTC (rev 383)
+++ pkg/stacomir/man/choice_c-BilanMigrationMult-method.Rd 2017-06-08 07:43:13 UTC (rev 384)
@@ -6,7 +6,7 @@
\title{command line interface for BilanMigrationMult class}
\usage{
\S4method{choice_c}{BilanMigrationMult}(object, dc, taxons, stades, datedebut,
- datefin)
+ datefin, silent = FALSE)
}
\arguments{
\item{object}{An object of class \link{BilanMigration-class}}
@@ -21,6 +21,8 @@
\item{datedebut}{The starting date as a character, formats like \code{\%Y-\%m-\%d} or \code{\%d-\%m-\%Y} can be used as input}
\item{datefin}{The finishing date of the Bilan, for this class this will be used to calculate the number of daily steps.}
+
+\item{silent}{Should messages be hided default FALSE}
}
\value{
An object of class \link{BilanMigrationMult-class}
More information about the Stacomir-commits
mailing list