# Exécuter tous les tests avec: testthat::test_dir('tests/testthat')
library(testthat)
test_dir('tests/testthat')

source(here::here("R/project/ecow_calculations.R"))

# 1 pour juste vaches, 2 = vaches + taureaux, 3 = vaches + taureaux + lignees
calcul_ecow_by_chep('FR03142115', 1) # DIDOU
calcul_ecow_by_chep('FR71499477', 1) # JEANNOT
calcul_ecow_by_chep('FR71082042', 1) # test embryons
calcul_ecow_by_chep('FR03320016', 1) # MICAUD

# Cheptels tests éCow
calcul_ecow_by_chep('FR49373240', 1) #21s
calcul_ecow_by_chep('FR79296901', 1) #25s
calcul_ecow_by_chep('FR42338149', 1) #21s
calcul_ecow_by_chep('FR71424024', 1) #11s
calcul_ecow_by_chep('FR71499477', 1) #13s
calcul_ecow_by_chep('FR58123075', 1) #24s
calcul_ecow_by_chep('FR71531193', 1) #29s
calcul_ecow_by_chep('FR12124049', 1) #24s
calcul_ecow_by_chep('FR69262063', 1) #22s
calcul_ecow_by_chep('FR72154002', 1) #21