[Stacomir-commits] r196 - pkg/stacomir/R

[noreply at r-forge.r-project.org]

Author: briand
Date: 2016-09-08 15:33:02 +0200 (Thu, 08 Sep 2016)
New Revision: 196

Modified:
   pkg/stacomir/R/fn_EcritBilanJournalier.r
Log:
Modifications to pass test

Modified: pkg/stacomir/R/fn_EcritBilanJournalier.r
===================================================================
--- pkg/stacomir/R/fn_EcritBilanJournalier.r	2016-09-08 13:09:09 UTC (rev 195)
+++ pkg/stacomir/R/fn_EcritBilanJournalier.r	2016-09-08 13:33:02 UTC (rev 196)
@@ -97,7 +97,8 @@
 		taxon= as.character(bilanMigration at taxons@data$tax_nom_latin)
 		stade= as.character(bilanMigration at stades@data$std_libelle)
 		DC=as.numeric(bilanMigration at dc@dc_selectionne)	
-		resum=funstat(tableau=bilanMigration at data,time.sequence=bilanMigration at time.sequence,taxon,stade,DC )
+		tableau<-bilanMigration at calcdata[[stringr::str_c("dc_",DC)]][["data"]]
+		resum=funstat(tableau=tableau,time.sequence=tableau$debut_pas,taxon,stade,DC,silent=silent )
 		fn_EcritBilanMensuel(bilanMigration,resum)
 	}#end function hconfirm