wiki:Recette EcritBilanJournalier

Version 1 (modified by cedric, 8 years ago) (diff)

--

Ecriture de bilan Journaliers dans la base à l'aide de code

Retour à Recette StacomiR Dernière mise à jour octobre 2016 adaptation stacomir v0.5


Pour l'exemple le code ci dessous écrit dans la base de données les bilans journaliers nécessaires aux bilans interannuels, mais il n'y a pas besoin de lancer l'écriture à chaque fois en cliquant sur le bouton lors de bilans migrations. La fonction fn_EcritBilanJournalier utilise maintenant sqldf qui est bien plus rapide pour écrire dans la base.

 # Ecriture rapide de bilans journaliers avec sqldf
###############################################################################


library(stacomiR)
# package pour str_c (coller ... concatener)
require(stringr) 
# lancement de stacomi en mode commande
stacomi(gr_interface=FALSE,
		login_window=FALSE,
		database_expected=TRUE)	
# creation du bilan migration multiple
bM=new("BilanMigration")
# choix de l'annee en boucle
# Y=2016
for (Y in 1996:2016){
	bM=choice_c(bM,
			dc=c(16),
			taxons=c("Anguilla anguilla"),
			stades=c("AGJ"),
			datedebut=str_c(Y,"-01-01"),
			datefin=str_c(Y,"-12-31"))
	bM<-charge(bM,silent=TRUE)
	bM<-connect(bM,silent=TRUE)
	bM<-calcule(bM,silent=TRUE)
# si  il y a des données
	if (nrow(bM@data)>0 ){
		fn_EcritBilanJournalier(bM,silent=TRUE)
	}
}