atualizando

This commit is contained in:
2023-10-27 14:05:26 -03:00
parent 01dc588bfe
commit 7762cf07af
3 changed files with 48 additions and 34 deletions

View File

@ -22,6 +22,20 @@ O arquivo será dividido em duas partes. A primeira *O SCRIPT* contem as tabelas
library(tidyr)
#+end_src
Comnpisição ideal em número de animais por categoria:
#+Caption: Tabela 1 - UGM de referência de acordo com a categoria animal
#+NAME: Tab1
| Cataegoria animal | UGM |
|-----------------------+------|
| Vacas em lactação | 1 |
| Vacas secas | 1 |
| Bezerras até 12 meses | 0.25 |
| Novilhas até 18 meses | 0.50 |
| Novilhas até 24 meses | 0.75 |
| Outros | 1 |
#+Caption:Tabela 2. Composição ideal em porcentagem , número de animais e UGM, com base em 10 vacas em lactação.
:PROPERTIES:
:TABLE_EXPORT_FILE: ~/Documentos/GITs/Compos_rebanho/data/composicao.csv
@ -30,13 +44,13 @@ O arquivo será dividido em duas partes. A primeira *O SCRIPT* contem as tabelas
#+NAME: C_ideal
| | Categoria de animais | Cabeças (N) | Cabeças (%) | UGM (N) | UGM (%) |
|---+-----------------------+-------------+-------------+---------+---------|
| # | Vacas em lactação | 20 | 60.6 | 20 | 75.0 |
| # | Vacas secas | 2 | 6.7 | 2 | 7.8 |
| # | Bezerras ate 12 meses | 4 | 13.3 | 1. | 3.9 |
| # | Novilhas até 18 meses | 2 | 6.7 | 1. | 3.9 |
| # | Novilhas até 24 meses | 2 | 6.7 | 1.5 | 5.9 |
| # | Vacas em lactação | 24 | 66.7 | 24 | 82.5 |
| # | Vacas secas | 2 | 5.9 | 2 | 6.8 |
| # | Bezerras ate 12 meses | 4 | 11.8 | 1. | 3.4 |
| # | Novilhas até 18 meses | 2 | 5.9 | 1. | 3.4 |
| # | Novilhas até 24 meses | 2 | 5.9 | 1.5 | 5.1 |
| # | Outros animais | | 0.0 | 0 | 0.0 |
| # | Total | 30 | 100.0 | 25.5 | 100.0 |
| # | Total | 34 | 100.0 | 29.5 | 100.0 |
| ^ | | Tcab | | Tugm | |
|---+-----------------------+-------------+-------------+---------+---------|
#+TBLFM: $4=$3*100/$Tcab;%.1f::@2$5=@2$3*remote(Tab1,@2$2)::@8$3=@2$3+@3$3+@4$3+@5$3+@6$3+@7$3::@3$5=@3$3*remote(Tab1, @3$2)::@4$5=@4$3*remote(Tab1, @4$2)::@5$5=@5$3*remote(Tab1, @5$2)::@6$5=@6$3*remote(Tab1, @6$2)::@7$5=@7$3*remote(Tab1, @7$2)::@8$5=vsum(@2..@7)::$6=$5*100/$Tugm;%.1f
@ -65,11 +79,11 @@ O arquivo será dividido em duas partes. A primeira *O SCRIPT* contem as tabelas
| | % Bezerras -> novilhas | 0.4 | 0.4 | 0.75 | 0.7 | 0.7 | 0.7 | % S_Nascidos |
| ^ | | BA1 | BA2 | BA3 | BA4 | BA5 | BA6 | |
|---+------------------------+------+------+------+------+------+------+--------------|
| | Vacas a vender | 0 | 0 | 0 | 0 | 3 | 2 | |
| | Vacas a vender | 0 | 0 | 0 | 0 | 3 | 3 | |
| ^ | | VV1 | VV2 | VV3 | VV4 | VV5 | VV6 | |
| | Novilhas a vender | 0 | 0 | 0 | 0 | 0 | 0 | |
| ^ | | NV1 | NV2 | NV3 | NV4 | NV5 | NV6 | |
| | Bezerras a vender | 0 | 4 | 11 | 14 | 14 | 15 | |
| | Bezerras a vender | 0 | 4 | 11 | 14 | 13 | 14 | |
| ^ | | BV1 | BV2 | BV3 | BV4 | BV5 | BV6 | |
|---+------------------------+------+------+------+------+------+------+--------------|
| | Vacas a comprar | 0 | 0 | 0 | 0 | 0 | 0 | |
@ -148,11 +162,12 @@ Na tabela 3.3 podemos observar...
| ^ | | EAV | TRV | COV | VEV | SAV | TCV | EFV |
| # | Novilhas 12<>24 | 0 | 4 | 0 | 0 | 4 | 4 | 0 |
| ^ | | EAN | TRN | CON | VEN | SAN | TCN | EFN |
| # | Bezerras <12 | 0 | 17 | 0 | 14 | 3 | 3 | 0 |
| # | Bezerras <12 | 0 | 17 | 0 | 13 | 4 | 4 | 0 |
| ^ | | EAB | FRB | COB | VEB | SAB | TCB | EFB |
| # | outros | 1 | | | | | | |
| ^ | | EAO | FRO | COO | VEO | SAO | TCO | EFO |
|---+-----------------+---------+-----+--------+-------+-------+-----+---------|
| | | | | | | | | |
#+TBLFM: $EAV=remote(Tab3_3, $EFV)::$TRV=remote(Tab3_3, $TCN)::$COV=remote(Tab0,$VC4)::$VEV=remote(Tab0, $VV4)::$SAV=$EAV+$TRV+$COV-$VEV::$EFV=$SAV::$EAN=remote(Tab3_3, $EFN)::$TRN=remote(Tab3_3, $TCB)::$CON=remote(Tab0,$NC4)::$VEN=remote(Tab0, $NV4)::$SAN=$EAN+$TRN+$CON-$VEN::$TCN=$SAN::$EFN=$SAN-$TCN::$EAB=remote(Tab3_3, $EFB)::$FRB=$EFV*remote(Tab0, $BA4);%.0f::$COB=remote(Tab0,$BC4)::$VEB=remote(Tab0,$BV4)::$SAB=$EAB+$FRB+$COB-$VEB::$TCB=$SAB::$EFB=$SAB-$TCB
@ -164,7 +179,7 @@ Na tabela 3.3 podemos observar...
|---+-----------------+---------+-----+--------+-------+-------+-----+---------|
| # | VACAS >24 | 24 | 4 | 0 | 3 | 25 | 0 | 25 |
| ^ | | EAV | TRV | COV | VEV | SAV | TCV | EFV |
| # | Novilhas 12<>24 | 0 | 3 | 0 | 0 | 3 | 3 | 0 |
| # | Novilhas 12<>24 | 0 | 4 | 0 | 0 | 4 | 4 | 0 |
| ^ | | EAN | TRN | CON | VEN | SAN | TCN | EFN |
| # | Bezerras <12 | 0 | 18 | 0 | 14 | 4 | 4 | 0 |
| ^ | | EAB | FRB | COB | VEB | SAB | TCB | EFB |
@ -172,7 +187,7 @@ Na tabela 3.3 podemos observar...
| ^ | | EAO | FRO | COO | VEO | SAO | TCO | EFO |
|---+-----------------+---------+-----+--------+-------+-------+-----+---------|
| | | | | | | | | |
#+TBLFM: $EAV=remote(Tab3_4, $EFV)::$TRV=remote(Tab3_4, $TCN)::$COV=remote(Tab0,$VC5)::$VEV=remote(Tab0, $VV5)::$SAV=$EAV+$TRV+$COV-$VEV::$EFV=$SAV::$EAN=remote(Tab3_4, $EFN)::$TRN=remote(Tab3_4, $TCB)::$CON=remote(Tab0,$NC5)::$VEN=remote(Tab0, $NV5)::$SAN=$EAN+$TRN+$CON-$VEN::$TCN=$SAN::$EFN=$SAN-$TCN::$EAB=remote(Tab3_4, $EFB)::$FRB=$EFV*remote(Tab0, $BA5);%.0f::$COB=remote(Tab0,$BC5)::$VEB=remote(Tab0,$BV4)::$SAB=$EAB+$FRB+$COB-$VEB::$TCB=$SAB::$EFB=$SAB-$TCB
#+TBLFM:$EAV=remote(Tab3_4,$EFV)::$TRV=remote(Tab3_4,$TCN)::$COV=remote(Tab0,$VC5)::$VEV=remote(Tab0,$VV5)::$SAV=$EAV+$TRV+$COV-$VEV::$EFV=$SAV::$EAN=remote(Tab3_4,$EFN)::$TRN=remote(Tab3_4,$TCB)::$CON=remote(Tab0,$NC5)::$VEN=remote(Tab0,$NV5)::$SAN=$EAN+$TRN+$CON-$VEN::$TCN=$SAN::$EFN=$SAN-$TCN::$EAB=remote(Tab3_4,$EFB)::$FRB=$EFV*remote(Tab0,$BA5);%.0f::$COB=remote(Tab0,$BC5)::$VEB=remote(Tab0,$BV4)::$SAB=$EAB+$FRB+$COB-$VEB::$TCB=$SAB::$EFB=$SAB-$TCB
@ -184,11 +199,11 @@ Na tabela 3.3 podemos observar...
#+caption: Composição do rebanho na fazenda VITRUVIO (ANO 6)
| | CATEGORIA | EXTTANT | TIR | COMPRA | VENDA | SALDO | TIC | EXTTFIN |
|---+-----------------+---------+-----+--------+-------+-------+-----+---------|
| # | VACAS >24 | 25 | 3 | 0 | 2 | 26 | 0 | 26 |
| # | VACAS >24 | 25 | 4 | 0 | 3 | 26 | 0 | 26 |
| ^ | | EAV | TRV | COV | VEV | SAV | TCV | EFV |
| # | Novilhas 12<>24 | 0 | 4 | 0 | 0 | 4 | 4 | 0 |
| ^ | | EAN | TRN | CON | VEN | SAN | TCN | EFN |
| # | Bezerras <12 | 0 | 18 | 0 | 15 | 3 | 3 | 0 |
| # | Bezerras <12 | 0 | 18 | 0 | 14 | 4 | 4 | 0 |
| ^ | | EAB | FRB | COB | VEB | SAB | TCB | EFB |
| # | outros | 1 | | | | | | |
| ^ | | EAO | FRO | COO | VEO | SAO | TCO | EFO |
@ -205,14 +220,14 @@ Na tabela 3.3 podemos observar...
:TABLE_EXPORT_FILE: ~/Documentos/GITs/Compos_rebanho/data/ResumoEvolucapVitruvio.csv
:TABLE_EXPORT_FORMAT: orgtbl-to-csv
:END:
| | Categoria | 2023 | 2024 | 2025 | 2026 | 2027 | 2028 |
|---+-----------+------+------+------+-------+-------+-------|
| # | Vacas | 0 | 20 | 20 | 24 | 25 | 26 |
| # | Novilhas | 20 | 0 | 4 | 4 | 3 | 4 |
| # | Terneiras | 0 | 4 | 4 | 3 | 4 | 3 |
|---+-----------+------+------+------+-------+-------+-------|
| # | T_cab | 20 | 24 | 28 | 31 | 32 | 33 |
| # | T_UGMs | 15. | 21. | 24. | 27.75 | 28.25 | 29.75 |
| | Categoria | 2023 | 2024 | 2025 | 2026 | 2027 | 2028 |
|---+-----------+------+------+------+------+------+------|
| # | Vacas | 0 | 20 | 20 | 24 | 25 | 26 |
| # | Novilhas | 20 | 0 | 4 | 4 | 4 | 4 |
| # | Terneiras | 0 | 4 | 4 | 4 | 4 | 4 |
|---+-----------+------+------+------+------+------+------|
| # | T_cab | 20 | 24 | 28 | 32 | 33 | 34 |
| # | T_UGMs | 15. | 21. | 24. | 28. | 29. | 30. |
#+TBLFM:@2$3=remote(Tab3_1, $SAV)::@2$4=remote(Tab3_2, $SAV)::@2$5=remote(Tab3_3, $SAV)::@2$6=remote(Tab3_4, $SAV)::@2$7=remote(Tab3_5, $SAV)::@2$8=remote(Tab3_6, $SAV)::@3$3=remote(Tab3_1, $SAN)::@3$4=remote(Tab3_2, $SAN)::@3$5=remote(Tab3_3, $SAN)::@3$6=remote(Tab3_4, $SAN)::@3$7=remote(Tab3_5, $SAN)::@3$8=remote(Tab3_6, $SAN)::@4$3=remote(Tab3_1, $SAB)::@4$4=remote(Tab3_2, $SAB)::@4$5=remote(Tab3_3, $SAB)::@4$6=remote(Tab3_4, $SAB)::@4$7=remote(Tab3_5, $SAB)::@4$8=remote(Tab3_6, $SAB)::@5$3=@2$3+@3$3+@4$3::@5$4=@2$4+@3$4+@4$4::@5$5=@2$5+@3$5+@4$5::@5$6=@2$6+@3$6+@4$6:: @5$7=@2$7+@3$7+@4$7::@5$8=@2$8+@3$8+@4$8::@6$3=(@2$3*remote(Tab1,@2$2)+@3$3*remote(tab1,@6$2)+@4$3*remote(tab1,@4$2))::@6$4=(@2$4*remote(Tab1,@2$2)+@3$4*remote(tab1,@6$2)+@4$4*remote(tab1,@4$2))::@6$5=(@2$5*remote(Tab1,@2$2)+@3$5*remote(tab1,@6$2)+@4$5*remote(tab1,@4$2))::@6$6=(@2$6*remote(Tab1,@2$2)+@3$6*remote(tab1,@6$2)+@4$6*remote(tab1,@4$2))::@6$7=(@2$7*remote(Tab1,@2$2)+@3$7*remote(tab1,@6$2)+@4$7*remote(tab1,@4$2))::@6$8=(@2$8*remote(Tab1,@2$2)+@3$8*remote(tab1,@6$2)+@4$8*remote(tab1,@4$2))
@ -337,7 +352,7 @@ O estabelecimento não possui animais, sendo que o início da atividade se dará
Com base nos índices zootécnicos e definições técnicas de capacidade de produção de alimentos, a evolução se dará conforme consta na Tabela 3, e Figura 1.
Tabela 3. Composição Resumo da evolução do rebanho (Animais existentes anualmente) nos primeiros anos do projeto
Tabela 3. Resumo da evolução do rebanho (Animais existentes anualmente) nos primeiros anos do projeto
#+begin_src R :exports results
#library(ascii) # exports result as org file
Evolucao <- fread("../data/ResumoEvolucaoVitruvio.csv", header=TRUE)