Evolução de rebanho leiteiro em PRV
-Table of Contents
--
-<<<<<<< HEAD
-
- 1. Indices - - -
- 2. Resumo da evolução - - -
- 3. TODO Resolver exportar ou criar data.tabela. Para continuar, é necessário exportar a Tabela acima. Faço pelo menu Table - Export to file. Nome do Arquivo a exportar = Tabela$.csv.>> - - -
- 4. TODO - Resolver exportação figura no arquivo html -
- 5. Figuras (só para testar) -======= -
- 1. Indices - - -
- 2. Resumo da evolução - - -
- 3. TODO Resolver exportar ou criar data.tabela. Para continuar, é necessário exportar a Tabela acima. Faço pelo menu Table - Export to file. Nome do Arquivo a exportar = Tabela$.csv.>> - - -
- 4. TODO - Resolver exportação figura no arquivo html - - -
- 5. Figuras (só para testar) ->>>>>>> 1d4d4f8 (para discutir na reuniao) -
-#+TODO -Continuar planilha -#+startup 2023-08-02 -
- - --Vou estudar o emacs calc, tentando elaborar uma planilha para evolução do -
- - --Vou utilizar os manuais on line https://orgmode.org/manual/Field-and-range-formulas.html -e https://orgmode.org/org.html#Built_002din-Table-Editor -
- -<<<<<<< HEAD -1. Indices
-======= -1. Indices
->>>>>>> 1d4d4f8 (para discutir na reuniao) --IP = intervalo entre partos (12 meses) (setq IP "12") -
- --PP = primeiro parto (24 meses) (setq PP "24") -
- --PL = PerÃodo de lactação (10 meses)(setq PL "10") -<<<<<<< HEAD -CL = capacidade de lotação (20UGM) (setq CL "20") -IndMor = Indice de mortalidade de bezerras -IRP = Índice de renovação do plantel - substituição de vacas velhas ou ruins -======= -'CL = capacidade de lotação (20UGM) (setq CL "20") -'IndMor = Indice de mortalidade de bezerras -'IRP = Ãndice de renovação do plantel - substituição de vacas velhas ou ruins ->>>>>>> 1d4d4f8 (para discutir na reuniao) -
- - --Comnpisição ideal em número de animais por categoria: -
-<<<<<<< HEAD -| Cataegoria animal | -UGM | -abrev | -
|---|---|---|
| Vacas em lactação | -1 | -vaca | -
| Vacas secas | -1 | -vase | -
| Bezerras até 12 meses | -0.25 | -Beze | -
| Novilhas até 18 meses | -0.50 | -No18 | -
| Novilhas até 24 meses | -0.75 | -No24 | -
| Outros | -1 | -Outr | -
-Os dados acima são padronizados, sendo que, por padrão, 1 UGM equivale a 500 kg de peso vivo. Desta forma, pode ser necessário ajustar as UGMs e acordo com o peso dos animais de cada fazenda. -
- -| Categoria de animais | -Cabeças | -%cab% | -UGM | -%UGM | -
|---|---|---|---|---|
| Vacas em lactação | -10 | -47.6 | -10 | -60.6 | -
| Vacas secas | -2 | -9.5 | -2 | -12.1 | -
| Bezerras ate 12 meses | -3 | -14.3 | -0.75 | -4.5 | -
| Novilhas até 18 meses | -3 | -14.3 | -1.5 | -9.1 | -
| Novilhas até 24 meses | -3 | -14.3 | -2.25 | -13.6 | -
| Outros animais | -- | 0.0 | -0 | -0.0 | -
| Total | -21 | -100.0 | -16.5 | -100.0 | -
-<<<<<<< HEAD -A composição do rebanho é dinâmico, com perspectativa de crescimento anual, até alcançar o limite de capacidade de suporte das pastagens ou de outro limitante definido pela infraestrutura ou de trabalho da fazenda. A espectativa de crescimento se deve à previsão de 1 parto anual -por vaca, que gera um incremento anual de 50% de fêmeas em relação ao número de vacas, e do descarte médio de 25% de vacas. -Quando for atingido o limite de vacas na fazenda, pode-se vender o excedente de fêmeas em idade de terneiras, novilhas prenhas, ou vacas, -de acordo com a conveniência da fazenda. Entretanto, a capacidade de suporte se dá em UGM, o que também vai limitar a opção pela venda de animais maiores. -Com base nos índices definidos em conjunto com a fazenda, e as entradas e saídas programadas na tabela 3, estimamos que a evolução do rebanho possa ocorrer conforme a tabela 9, ressalvando que esses valores não são absolutos, pois podem ocorrer imprevistos que alterem a evolução. Da mesma forma, havendo alteração nos índices esperados,haverá impacto na evolução do rebanho, o que não caracteriza necessariamente erro de previsão ou de manejo. -======= -A composição do rebanho é dinâmico, com espectativa de crescimento ao longo do tempo, até alcançar o limite de suporte das pastagens -ou de outro limitante definido pela infraestrutura ou de trabalho da fazenda. A espectativa de crescimento se deve à previsão de 1 parto anual -por vaca, que gera um incremento anual de 50% de fêmeas em relação ao número de vacas, e do descarte de 25% das vacas. -Quando for atingido o limite de vacas na fazenda, pode-se vender o excedente de fêmeas em idade de terneiras, novilhas prenhas, ou vacas, -de acordo com a conveniência da fazenda. Entretanto, o limite é medido em UGM, o que também vai limitar a opção pela venda de animais maiores. -Com base nos índices definidos em conjunto com a fazenda, estimamos que a evolução do rebanho de apresente conforme a tabela 3, ressalvando que -esses valores não são absolutos, pois podem ocorrer imprevistos que alterem a evolução. Da mesma forma, havendo alteração nos índices esperados, -haverá impacto na evolução do rebanho, o que não caracteriza necessariamente erro de previsão ou de manejo. ->>>>>>> 1d4d4f8 (para discutir na reuniao) -
- - - - -<<<<<<< HEAD -1.1. Tabela de entradas e saídas de animais
--Os dados desta tabela deve ser alterados conforme necessário para alcançar a evolução do rebanho desejada. -As tabelas de composição de rebanho serão calculadas automáticamente, com base nos dados anotados na tabela <Tab0tabela 3>. -
-| Constante | -ano 1 | -ano 2 | -ano 3 | -ano 4 | -ano 5 | -ano .. | -observação | -- | |||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| Partos por vaca ano | -1 | -1 | -1 | -1 | -1 | -1 | -- | - | |||||||
| Vacas Existentes | -20 | -- | -- | -- | -- | -- | -<<<<<<< HEAD -- na elaboração do projeto | -======= -- a calcular | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -- | ||||||
| Novilhas (12 a 24) existentes | -<<<<<<< HEAD -0 | -======= -05 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -- | -- | -- | -- | -- | -<<<<<<< HEAD -- na elaboração do projeto | -======= -- a calcular | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -- | |||||
| Bezerras existentes | -0 | -- | -- | -- | -- | -- | -<<<<<<< HEAD -- na elaboração do projeto | -======= -- a calcular | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -- | ||||||
| Novilhas para vacas | -0 | -<<<<<<< HEAD -5 | -0 | -0 | -0 | -0 | -- Anual | -======= -0 | -5 | -5 | -7 | -7 | -->>>>>>> 1d4d4f8 (para discutir na reuniao) - | - | |
| % Bezerras para novilhas | -0.4 | -0.4 | -0.4 | -0.4 | -0.4 | -0.4 | -<<<<<<< HEAD -- base no total nascidos | -======= -com base no total de nascidos | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -- | ||||||
| Vacas a vender | -0 | -0 | -0 | -3 | -<<<<<<< HEAD -10 | -7 | -- anual | -======= -3 | -5 | -->>>>>>> 1d4d4f8 (para discutir na reuniao) - | - | ||||
| Novilhas a vender (Num) | -0 | -0 | -0 | -0 | -7 | -7 | -<<<<<<< HEAD -- anual | -======= -->>>>>>> 1d4d4f8 (para discutir na reuniao) - | - | ||||||
| Bezerras a vender | -0 | -0 | -1 | -1 | -1 | -1 | -<<<<<<< HEAD -- anual | -======= -->>>>>>> 1d4d4f8 (para discutir na reuniao) - | - | ||||||
| Vacas a comprar | -0 | -<<<<<<< HEAD -0 | -0 | -0 | -0 | -0 | -- anual | -- | |||||||
| Novilhas a comprar | -======= ->>>>>>> 1d4d4f8 (para discutir na reuniao) -5 | -0 | -0 | -0 | -0 | -<<<<<<< HEAD -0 | -- anual | -======= -- | - | ||||||
| Novilhas a comprar | -2 | -0 | -0 | -0 | -0 | -0 | -->>>>>>> 1d4d4f8 (para discutir na reuniao) - | - | |||||||
| Bezerras a compras | -<<<<<<< HEAD -0 | -0 | -0 | -0 | -0 | -0 | --anual | -======= -1 | -1 | -1 | -1 | -1 | -1 | -->>>>>>> 1d4d4f8 (para discutir na reuniao) - | - |
-Com a evolução estimada através dos indicadores: -. 1 parto por vaca por ano; -. Primeiro parto aos 18 meses -. Descarte de 25% das vacas a partir do 3º ano -. Capacidade de suporte para 40 vacas -. Aproveitamento de 40% dos nascidos para repsição -Temos o seguinte: ->> Iniciamos com 20 vacas -<<<<<<< HEAD ->> Compramos 5 novilhas cobertas -
- - -| Categoria | -ExttAnt | -TIR | -Compra | -Venda | -Saldo | -TIC | -ExttFin | -|||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| VACAS >24 | -20 | -0 | -0 | -0 | -20 | -0 | -20 | -|||||||
| NOVILHAS 12<>24 | -<<<<<<< HEAD -0 | -0 | -5 | -0 | -5 | -0 | -5 | -======= -1 | -5 | -2 | -0 | -8 | -0 | -3 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -
| BEZERRAS <12 | -<<<<<<< HEAD -0 | -8 | -0 | -0 | -8 | -8 | -======= -2 | -8 | -0 | -0 | -10 | -10 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -0 | -|
| Outros | -- | 0 | -0 | -0 | -- | 0 | -0 | -
-Na tabela 3.1 consta o número de animais para cada categoria, com as ocorrencias do ano. No caso das vacas, não há alteração, visto que não há entradas, nem saídas, e o número inicial é o mesmo do final. No caso das novilhas, há movimentação, com a transferência interna de 5 (que passam de bezerras para novilhas), compra de 2, e transferência cedendo 5 para serem vacas no próximo ano. Assim, o ano inicia com 1 novilha, e termina com 3. -
- - - - -<<<<<<< HEAD -| CATEGORIA | -EXTTANT | -TIR | -COMPRA | -VENDA | -SALDO | -TIC | -EXTTFIN | -|||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|
| VACAS >24 | -20 | -0 | -<<<<<<< HEAD -0 | -0 | -20 | -0 | -20 | -======= -5 | -0 | -25 | -0 | -25 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -
| Novilhas 12<>24 | -<<<<<<< HEAD -5 | -8 | -======= -3 | -10 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -0 | -0 | -13 | -13 | -0 | -|||
| Bezerras <12 | -0 | -<<<<<<< HEAD -8 | -0 | -0 | -8 | -8 | -======= -10 | -1 | -0 | -11 | -11 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -0 | -
| outros | -1 | -- | - | - | 1 | -- | 1 | -
1.2. Comentários sobre tabela acima
-======= -1.2. Comentários sobre tabela acima
->>>>>>> 1d4d4f8 (para discutir na reuniao) --Na tabela 3.3 podemos observar… -
-<<<<<<< HEAD -| CATEGORIA | -EXTTANT | -TIR | -COMPRA | -VENDA | -SALDO | -TIC | -EXTTFIN | -|||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| VACAS >24 | -<<<<<<< HEAD -20 | -13 | -0 | -0 | -33 | -0 | -33 | -======= -25 | -13 | -0 | -0 | -38 | -0 | -38 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -
| Novilhas 12<>24 | -0 | -<<<<<<< HEAD -8 | -0 | -0 | -8 | -8 | -======= -11 | -0 | -0 | -11 | -11 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -0 | -||
| Bezerras <12 | -0 | -<<<<<<< HEAD -13 | -0 | -1 | -12 | -12 | -======= -15 | -1 | -1 | -15 | -15 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -0 | -||
| outros | -1 | -- | - | - | 1 | -- | 1 | -
1.3. Comentários da tabela acima
-======= -1.3. Comentários da tabela acima
->>>>>>> 1d4d4f8 (para discutir na reuniao) --Na tabela 3.4 … -
- -<<<<<<< HEAD -| CATEGORIA | -EXTTANT | -TIR | -COMPRA | -VENDA | -SALDO | -TIC | -EXTTFIN | -|||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| VACAS >24 | -<<<<<<< HEAD -33 | -8 | -0 | -3 | -38 | -0 | -38 | -======= -38 | -11 | -0 | -3 | -46 | -0 | -46 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -
| Novilhas 12<>24 | -0 | -<<<<<<< HEAD -12 | -0 | -0 | -12 | -12 | -======= -15 | -0 | -0 | -15 | -15 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -0 | -||
| Bezerras <12 | -0 | -<<<<<<< HEAD -15 | -0 | -1 | -14 | -14 | -======= -18 | -1 | -1 | -18 | -18 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -0 | -||
| outros | -1 | -- | - | - | 1 | -- | 1 | -
1.4. Comentários da tabela acima
-======= -1.4. Comentários da tabela acima
->>>>>>> 1d4d4f8 (para discutir na reuniao) --na tabela 3.5 -
- - --:TABLEEXPORTFILE: Documents/Tabela 3.5.csv -:TABLEEXPORTFORMAT: orgtbl-to-csv -
-| CATEGORIA | -EXTTANT | -TIR | -COMPRA | -VENDA | -SALDO | -TIC | -EXTTFIN | -|||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| VACAS >24 | -<<<<<<< HEAD -38 | -12 | -0 | -10 | -40 | -0 | -40 | -======= -46 | -15 | -0 | -3 | -58 | -0 | -58 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -
| Novilhas 12<>24 | -0 | -<<<<<<< HEAD -14 | -0 | -7 | -7 | -7 | -======= -18 | -0 | -7 | -11 | -11 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -0 | -||
| Bezerras <12 | -0 | -<<<<<<< HEAD -16 | -0 | -1 | -15 | -15 | -======= -23 | -1 | -1 | -23 | -23 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -0 | -||
| outros | -1 | -- | - | - | 1 | -- | 1 | -|||||||
| - | - | - | - | - | - | - | - |
-e, finalmente, na tabela 3.6, a composição do rebanho no sexto ano após a implementeação e adoção do PRV na propriedade VITRUVIO. -
- - -<<<<<<< HEAD -| CATEGORIA | -EXTTANT | -TIR | -COMPRA | -VENDA | -SALDO | -TIC | -EXTTFIN | -|||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| VACAS >24 | -<<<<<<< HEAD -40 | -7 | -0 | -7 | -40 | -0 | -40 | -======= -58 | -11 | -0 | -5 | -64 | -0 | -64 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -
| Novilhas 12<>24 | -0 | -<<<<<<< HEAD -15 | -0 | -7 | -8 | -8 | -======= -23 | -0 | -7 | -16 | -16 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -0 | -||
| Bezerras <12 | -0 | -<<<<<<< HEAD -16 | -0 | -1 | -15 | -15 | -======= -26 | -1 | -1 | -26 | -26 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -0 | -||
| outros | -1 | -- | - | - | 1 | -- | 1 | -|||||||
| - | - | - | - | - | - | - | - |
2. Resumo da evolução
-======= -2. Resumo da evolução
->>>>>>> 1d4d4f8 (para discutir na reuniao) --Esta tabela é a que efetivamente interessa para ser apresentada ao cliente, ou para análise técnica, pois apresenta o resumo (resultado da evolução) proposto para a fazenda. -
-2.1. Tabela com os dados resumidos referente aos animais existentes anualmente
-======= -2.1. Tabela com os dados resumidos referente aos animais existentes anualmente
->>>>>>> 1d4d4f8 (para discutir na reuniao) --Os dados da tabela abaixo resultam da estimativa de evolução de rebanho, de acordo com os dados da tabela de dados. -
- --:TABLEEXPORTFILE: Documents/Tabela4.csv -:TABLEEXPORTFORMAT: orgtbl-to-csv -
-| Ano | -2004 | -2005 | -2006 | -2007 | -2008 | -2009 | -||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|
| Vacas | -20 | -<<<<<<< HEAD -20 | -33 | -38 | -40 | -40 | -======= -25 | -38 | -46 | -58 | -64 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -|
| Novilhas | -<<<<<<< HEAD -5 | -13 | -8 | -12 | -7 | -8 | -======= -8 | -13 | -11 | -15 | -11 | -16 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -
| Terneiras | -<<<<<<< HEAD -8 | -8 | -12 | -14 | -15 | -15 | -||||||
| Total | -33 | -41 | -53 | -64 | -60 | -63 | -======= -10 | -11 | -15 | -18 | -23 | -26 | ->>>>>>> 1d4d4f8 (para discutir na reuniao) -
3. TODO Resolver exportar ou criar data.tabela. Para continuar, é necessário exportar a Tabela acima. Faço pelo menu Table - Export to file. Nome do Arquivo a exportar = Tabela$.csv.>>
-3.0.1. Importação dos dados dos animais existentes
-library (data.table)
-library(tidyr)
-library(dplyr)
-Evol_exist <- fread("data/Tabela4.csv", check.names =FALSE, header=TRUE)
- str(Evol_exist)
-=======
-
-3. TODO Resolver exportar ou criar data.tabela. Para continuar, é necessário exportar a Tabela acima. Faço pelo menu Table - Export to file. Nome do Arquivo a exportar = Tabela$.csv.>>
-
-
-
-3.0.1. Importação dos dados dos animais existentes
-
-
-getwd()
- library (data.table)
- Evol_exist <- fread("data/Tabela4.csv", check.names =FALSE, header=TRUE)
-# str(Evol_exist)
->>>>>>> 1d4d4f8 (para discutir na reuniao)
-#View(Evol_exist)
-#Transpor a tabela
-Evol_exist1<-dcast(melt(Evol_exist, id.vars="Ano"),variable ~Ano)
-# deu um trabalho para n ão aparecer uma linha nova com os nomes da colunas...
-str(Evol_exist1)
-<<<<<<< HEAD
-Evoluc<-Evol_exist1%>%
- pivot_longer(!variable, names_to="Categoria", values_to="Cabecas")%>%
- dplyr::mutate(Ano=variable)
-#View(Evoluc)
-str(Evoluc)
-=======
->>>>>>> 1d4d4f8 (para discutir na reuniao)
-
-
-
-
-
-
-<<<<<<< HEAD
-
-3.0.2. Gráfico da evolução do rebanho
-
-
-
-3.1. Gráfico 1
-
-
- library (ggplot2)
-
- Evoluc<-ggplot(Evoluc, aes(x=Ano, y=Cabecas, group = Categoria))+
- geom_line (aes(color=Categoria))+
- geom_point(aes(color=Categoria))
-
-Evoluc
-
-
-=======
-
-3.0.2. Gráfico da evolução do rebanho
-
-
-
-3.1. Gráfico 1
-
-
-#+BEGINsrc R
-library (ggplot2)
-
-
-
-ggplot(Evolexist1,
-aes(x as.numeric(variable)))+
-geom_line ( aes (y = Vacas),col"red")+
-geomline (aes(y=Novilhas), col="blue")+
-geomline (aes(y=Terneiras), col="green")
-
-
-
-ENDsrc
-
->>>>>>> 1d4d4f8 (para discutir na reuniao)
-
-
-
-
-<<<<<<< HEAD
-
-4. TODO - Resolver exportação figura no arquivo html
-
-
-
-
-5. Figuras (só para testar)
-=======
-
-4. TODO - Resolver exportação figura no arquivo html
-
-
-
-4.1. Animais comprados
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-Vacas compradas
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-Novilhas compradas
-
-
-
-
-
-
-as
-
-
-
-
-
-
-
-
-
-
-
-Terneiras compradas
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-4.2. Animais vendidos
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-Vacas vendidas
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-Novilhas vendidas
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-Terneiras vendidas
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-5. Figuras (só para testar)
->>>>>>> 1d4d4f8 (para discutir na reuniao)
-
-
-Exemplo 2
-
-
-https://nuvem.multifarm.top/apps/files/?dir=/Photos&openfile=457851
-
-
-
-
-Exemplo 3 -
-<<<<<<< HEAD
-#+beginexport html
-<div id="subtittle" style="float: center; text-aling:center;">
-<p>
-<font size="1"> Composição do rebanho. Nes propriedade, os animais são divididos em dois lotes para o pastoreio.</font>
-</p>
-<p>
-<a href="http://multifarm.top">
-<img src= "https://nuvem.multifarm.top/apps/files/?dir=/Photos&openfile=457848" width = "250"/>
-</a>
-</p>
-</div>
-#+endexport>
-=======
-
-
-https://nuvem.multifarm.top/apps/files/?dir=/Photos&openfile=457848
->>>>>>> 1d4d4f8 (para discutir na reuniao)
-
-
-
-
-
-Date: 08-31-2023
-
-<<<<<<< HEAD
-Created: 2023-09-26 ter 20:42
-=======
-Created: 2023-09-20 qua 14:59
->>>>>>> 1d4d4f8 (para discutir na reuniao)
-
-
-
-
diff --git a/EvolucaoVitruvio.html b/EvolucaoVitruvio.html
index cbccf9f..df7da89 100644
--- a/EvolucaoVitruvio.html
+++ b/EvolucaoVitruvio.html
@@ -26,160 +26,53 @@
Table of Contents
-- 1. TODO
-- 2. Indices
-- 3. Relação UGM e categoria animal
-- 4. Composição do Rebanho
-- 5. Tabela inicial, com o dimensionamento atual e previsão de entradas e saídas de animais
-- 6. Composição anual do rebanho da fazenda
+
- 1. O SCRIPT
+- 2. Tabela inicial, com o dimensionamento atual e previsão de entradas e saídas de animais
-- 7. Resumo da evolução
+
- 3. Texto Sugestão
-- 7.1. Entradas e saídas
-- 7.2. Animais existentes
+- 3.1. Composição e evolução do rebanho
+- 3.2. Relação Unidade de Gado Maior (UGM) x categoria animal
+- 3.3. Composição do Rebanho
+
-- 8. TODO Resolver exportar ou criar data.tabela. Para continuar, é necessário exportar a Tabela acima. Faço pelo menu Table - Export to file. Nome do Arquivo a exportar = Tabela$.csv.>>
-
+- 4. Referências
+
+CONFIGURAÇÕES: VER https://github.com/erikriverson/org-mode-R-tutorial/blob/master/org-mode-R-tutorial.org
+
-
-
-
-1. TODO
+
+1. O SCRIPT
-Continuar planilha
-#+startup 2023-08-02
+:TABLEEXPORTFILE: ~/Documentos/GITs/Composrebanho/data/composicao.csv
+:TABLEEXPORTFORMAT: orgtbl-to-csv
+
-
-Vou estudar o emacs calc, tentando elaborar uma planilha para evolução do
-
-
-
-
-
-Vou utilizar os manuais on line https://orgmode.org/manual/Field-and-range-formulas.html
-e https://orgmode.org/org.html#Built_002din-Table-Editor
-
-
-
-
-
-2. Indices
-
-
-IP = intervalo entre partos (12 meses) (setq IP "12")
-
-
-
-PP = primeiro parto (24 meses) (setq PP "24")
-
-
-
-PL = PerÃodo de lactação (10 meses)(setq PL "10")
-
-
-
-CL = capacidade de lotação (20UGM) (setq CL "20")
-IndMor = Indice de mortalidade de bezerras
-IRP = Índice de renovação do plantel - substituição de vacas velhas ou ruins
-
-
-
-
-
-
-3. Relação UGM e categoria animal
-
-
-Table 1: UGM de referência de acordo com a categoria animal
-
-
-
-
-
-
-
-
-
-
-Cataegoria animal
-UGM
-abrev
-
-
-
-
-Vacas em lactação
-1
-vaca
-
-
-
-Vacas secas
-1
-vase
-
-
-
-Bezerras até 12 meses
-0.25
-Beze
-
-
-
-Novilhas até 18 meses
-0.50
-No18
-
-
-
-Novilhas até 24 meses
-0.75
-No24
-
-
-
-Outros
-1
-Outr
-
-
-
-
-
-Os dados acima são padronizados, sendo que, por padrão, 1 UGM equivale a 500 kg de peso vivo. Desta forma, pode ser necessário ajustar as UGMs e acordo com o peso dos animais de cada fazenda.
-
-
-
-
-4. Composição do Rebanho
-
-
-A composição do rebanho de cada estabelecimento varia conforme os objetivos, índices e manejo adotado. De modo geral busca-se uma composição com maior participação de categorias produtivas, ou seja, em caso de atividade leiteira, busca-se maior número de animais na categoria vacas em lactação.
-Os dados da tabela 2 refletem a composição de um rebanho com finalidade de produção de leite, considerando um manejo reprodutivo e de alimentação excelentes.
-
-
-
-Table 2: Composição ideal em porcentagem , número de animais e UGM, com base em 10 vacas em lactação.
-
@@ -194,51 +87,51 @@ Os dados da tabela 2 refletem a composição de um rebanho com finalidade de pro
Categoria de animais
-Cabeças
-%cab%
-UGM
-%UGM
+Cabeças (N)
+Cabeças (%)
+UGM (N)
+UGM (%)
Vacas em lactação
-18
-51.4
-18
-76.9
+20
+60.6
+20
+75.0
Vacas secas
2
-9.5
+6.7
2
-12.1
+7.8
Bezerras ate 12 meses
-10
-32.3
-2.5
-2.8
+4
+13.3
+1.
+3.9
Novilhas até 18 meses
-3
-9.1
-1.5
-6.2
+2
+6.7
+1.
+3.9
Novilhas até 24 meses
-0
-0.0
-0.
-0.0
+2
+6.7
+1.5
+5.9
@@ -251,40 +144,29 @@ Os dados da tabela 2 refletem a composição de um rebanho com finalidade de pro
Total
-33
+30
100.0
-24.
+25.5
100.0
-
-
-
-
-A composição do rebanho é dinâmico, com espectativa de crescimento ao longo do tempo, até alcançar o limite de suporte das pastagens
-ou de outro limitante definido pela infraestrutura ou de trabalho da fazenda. A espectativa de crescimento se deve à previsão de 1 parto anual
-por vaca, que gera um incremento anual de 50% de fêmeas em relação ao número de vacas, e do descarte de 25% das vacas.
-Quando for atingido o limite de vacas na fazenda, pode-se vender o excedente de fêmeas em idade de terneiras, novilhas prenhas, ou vacas,
-de acordo com a conveniência da fazenda. Entretanto, o limite é medido em UGM, o que também vai limitar a opção pela venda de animais maiores.
-Com base nos índices definidos em conjunto com a fazenda, estimamos que a evolução do rebanho de apresente conforme a tabela 3, ressalvando que
-esses valores não são absolutos, pois podem ocorrer imprevistos que alterem a evolução. Da mesma forma, havendo alteração nos índices esperados,
-haverá impacto na evolução do rebanho, o que não caracteriza necessariamente erro de previsão ou de manejo.
-
-
-5. Tabela inicial, com o dimensionamento atual e previsão de entradas e saídas de animais
-
+
+
+
+2. Tabela inicial, com o dimensionamento atual e previsão de entradas e saídas de animais
+
-Os dados desta tabela deve ser alterados conforme necessário para alcançar a evolução do rebanho desejada.
-As tabelas de composição de rebanho serão calculadas automáticamente, com base nos dados anotados na tabela <Tab0>.
+## Os dados desta tabela deve ser alterados conforme necessário para alcançar a evolução do rebanho desejada.
+## As tabelas de composição de rebanho serão calculadas automáticamente, com base nos dados anotados na tabela <Tab0>.
-
-Table 3: Entradas e saídas de animais do rebanho durante os primeiros 6 anos (até estabilizar)
+
+Table 1: Entradas e saídas de animais do rebanho durante os primeiros 6 anos (até estabilizar)
@@ -306,12 +188,12 @@ As tabelas de composição de rebanho serão calculadas automáticamente, com ba
Constante
-ano 1
-ano 2
-ano 3
-ano 4
-ano 5
-ano ..
+2023
+2024
+2025
+2026
+2027
+2028
observação
@@ -391,8 +273,8 @@ As tabelas de composição de rebanho serão calculadas automáticamente, com ba
0
0
0
-5
-4
+3
+2
@@ -411,10 +293,10 @@ As tabelas de composição de rebanho serão calculadas automáticamente, com ba
Bezerras a vender
0
4
-10
-12
-15
+11
14
+14
+15
@@ -453,32 +335,22 @@ As tabelas de composição de rebanho serão calculadas automáticamente, com ba
+
+
+
+2.1. Composição anual do rebanho da fazenda
+
-Com a evolução estimada através dos indicadores:
-. 1 parto por vaca por ano;
-. Primeiro parto aos 18 meses
-. Descarte de 25% das vacas a partir do 3º ano
-. Capacidade de suporte para 40 vacas
-. Aproveitamento de 40% dos nascidos para repsição
-Temos o seguinte:
->> Iniciamos com 20 vacas
->> Compramos 5 novilhas cobertas
->> No segundo ano serão compradas 2 novilhas
+;; Estas tabelas (Tab31 a Tab3-2 servem para calcular a evolução, mas não serão incluidos no relatórios final)
-
-
-
-6. Composição anual do rebanho da fazenda
-
-
-
-6.1. Ano 1
-
-
-Table 4: Composição do rebanho na fazenda VITRUVIO (ANO 1)
+
+2.2. Ano 2023
+
+
+Table 2: Composição do rebanho na fazenda VITRUVIO (ANO 1)
@@ -555,20 +427,17 @@ Temos o seguinte:
-
-
-
-Na tabela 4 consta o número de animais para cada categoria, com as ocorrencias do ano. No caso das vacas, não há alteração, visto que não há entradas, nem saídas, e o número inicial é o mesmo do final. No caso das novilhas, há movimentação, com a transferência interna de 5 (que passam de bezerras para novilhas), compra de 2, e transferência cedendo 5 para serem vacas no próximo ano. Assim, o ano inicia com 1 novilha, e termina com 3.
-
-
-6.2. Ano 2
-
-
-Table 5: Composição do rebanho na fazenda VITRUVIO (ANO 2)
+
+
+
+2.3. Ano 2024
+
+
+Table 3: Composição do rebanho na fazenda VITRUVIO (ANO 2)
@@ -645,20 +514,18 @@ Na tabela 4 consta o número de animais para cada categoria, com as ocorrencias
+
+
-
-Comentários sobre tabela 5
-
-
-
-
-6.3. Ano 3
-
+
+
+2.4. Ano 2025
+
Na tabela 3.3 podemos observar…
-
-Table 6: Composição do rebanho na fazenda VITRUVIO (ANO 3)
+
+Table 4: Composição do rebanho na fazenda VITRUVIO (ANO 3)
@@ -717,9 +584,9 @@ Na tabela 3.3 podemos observar…
0
15
0
-10
-5
-5
+11
+4
+4
0
@@ -735,17 +602,15 @@ Na tabela 3.3 podemos observar…
-
-Comentários sobre a tabela 6
-
-
-6.4. Ano 4
-
-
-Table 7: Composição do rebanho na fazenda VITRUVIO (ANO 4)
+
+
+2.5. Ano2026
+
+
+Table 5: Composição do rebanho na fazenda VITRUVIO (ANO 4)
@@ -791,11 +656,11 @@ Comentários sobre a tabela 6
Novilhas 12<>24
0
-5
+4
0
0
-5
-5
+4
+4
0
@@ -804,9 +669,9 @@ Comentários sobre a tabela 6
0
17
0
-12
-5
-5
+14
+3
+3
0
@@ -822,22 +687,16 @@ Comentários sobre a tabela 6
-
-
-Comentários da tabela 7
-
-
-6.5. Ano 5
-
-
-:TABLEEXPORTFILE: Documents/Tabela 3.5.csv
-:TABLEEXPORTFORMAT: orgtbl-to-csv
-
-
+
+2.6. Ano 2027
+
+
+Table 6: Composição do rebanho na fazenda VITRUVIO (ANO 5)
+
@@ -871,33 +730,33 @@ Comentários da tabela 7
VACAS >24
24
-5
+4
0
-5
-24
+3
+25
0
-24
+25
Novilhas 12<>24
0
-5
+3
0
0
-5
-5
+3
+3
0
Bezerras <12
0
-17
+18
0
-12
-5
-5
+14
+4
+4
0
@@ -925,23 +784,16 @@ Comentários da tabela 7
-
-
-Comentários da tabela 8
-
-
-6.6. Ano 6
-
-
-e, finalmente, na tabela 9, a composição do rebanho no sexto ano após a implementeação e adoção do PRV na propriedade VITRUVIO.
-
-
-Table 8: Composição do rebanho na fazenda VITRUVIO (ANO 6)
+
+2.7. Ano 2028
+
+
+Table 7: Composição do rebanho na fazenda VITRUVIO (ANO 6)
@@ -975,23 +827,23 @@ e, finalmente, na tabela 9, a composição do rebanho no sexto ano após a imple
VACAS >24
-24
-5
-0
-4
25
+3
0
-25
+2
+26
+0
+26
Novilhas 12<>24
0
-5
+4
0
0
-5
-5
+4
+4
0
@@ -1000,9 +852,9 @@ e, finalmente, na tabela 9, a composição do rebanho no sexto ano após a imple
0
18
0
-14
-4
-4
+15
+3
+3
0
@@ -1020,26 +872,17 @@ e, finalmente, na tabela 9, a composição do rebanho no sexto ano após a imple
-
-
-7. Resumo da evolução
-
+
+
+2.8. Animais existentes
+
-Esta tabela é a que efetivamente interessa para ser apresentada ao cliente, ou para análise técnica, pois apresenta o resumo (resultado da evolução) proposto para a fazenda.
+:TABLEEXPORTFILE: ~/Documentos/GITs/Composrebanho/data/ResumoEvolucapVitruvio.csv
+:TABLEEXPORTFORMAT: orgtbl-to-csv
-
-
-Tabela com os dados resumidos referente aos animais existentes anualmente
-Os dados da tabela abaixo resultam da estimativa de evolução de rebanho, de acordo com os dados da tabela de dados.
-
-
-
-
-7.1. Entradas e saídas
-
@@ -1060,13 +903,109 @@ Os dados da tabela abaixo resultam da estimativa de evolução de rebanho, de ac
-Ano
-2004
-2005
-2006
-2007
-2008
-2009
+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
+
+
+
+
+Tcab
+20
+24
+28
+31
+32
+33
+
+
+
+TUGMs
+15.
+21.
+24.
+27.75
+28.25
+29.75
+
+
+
+
+
+## A TABELA5 será incluída no documento final
+
+
+
+
+
+2.9. Entradas e saídas
+
+
+:TABLEEXPORTFILE: ~/Documentos/GITs/Composrebanho/data/ResumoEntraSaiVitruvio.csv
+:TABLEEXPORTFORMAT: orgtbl-to-csv
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+Categoria
+2023
+2024
+2025
+2026
+2027
+2028
@@ -1107,7 +1046,7 @@ Os dados da tabela abaixo resultam da estimativa de evolução de rebanho, de ac
0
0
0
-20
+0
0
@@ -1118,8 +1057,8 @@ Os dados da tabela abaixo resultam da estimativa de evolução de rebanho, de ac
0
0
0
-5
-4
+3
+2
@@ -1136,10 +1075,10 @@ Os dados da tabela abaixo resultam da estimativa de evolução de rebanho, de ac
Terneiras saídas
0
4
-10
-12
-12
+11
14
+14
+15
@@ -1147,10 +1086,20 @@ Os dados da tabela abaixo resultam da estimativa de evolução de rebanho, de ac
Total saídas
0
4
-10
-12
+11
+14
17
-18
+17
+
+
+
+
+
+
+
+
+
+
@@ -1165,15 +1114,61 @@ Os dados da tabela abaixo resultam da estimativa de evolução de rebanho, de ac
+
+## Para exportar a tabela > M-x org-tabel-export (enter) "path" y, ,..
+
-
-7.2. Animais existentes
-
+
+
+2.10. Gráfico resumo
+
-:TABLEEXPORTFILE: data/Tabela4.csv
-:TABLEEXPORTFORMAT: orgtbl-to-csv
+** Gráfico para uso
+
+
+ library (ggplot2)
+
+ ResEvolVit<-ggplot(REv, aes(Ano,
+ Quantidade,
+ colour=Categoria))+
+ geom_line()
+ggsave("EvolucaoRebanho.png", ResEvolVit, path="~/Nextcloud/00-Projetos/01-Vitruvio/2023/04-Imagens/DocFinal", width=7, height=3, units="in")
+#ResEvolVit
+
+
+
+
+
+
+
+3. Texto Sugestão
+
+
+
+3.1. Composição e evolução do rebanho
+
+
+A composição do rebanho de cada estabelecimento varia conforme os objetivos, índices e manejo adotado. De modo geral, busca-se uma composição com maior participação de categorias produtivas, ou seja, em caso de atividade leiteira, busca-se maior número de animais na categoria vacas em lactação. Sua limitação geralmente está na capacidade de produção de alimentos na propriedade, ou ainda na capacidade de trabalho e das instalações.
+Como o objetivo da presente proposta visa explorar a atividade em sistema a base de pasto, sendo que a maior parte da alimentação prevista será produzida no estabelecimento, este será considerado o fator limitante.
+Da mesma forma, e evolução terá de respeitar o limite do estabelecimento, com incremento constante acompanhando as melhorias das pastagens.
+Propomos que a base da composição e evolução seja calculada em número de cabeças e em unidade de gado maior (UMG), sendo que cada UGM equivale a 500 kg de peso vivo animal. De maneira geral, estima-se a UGM de acordo com a categoria animal ao qual pertence (Tabela 1). Esta é apenas uma aproximação, sendo que deve ser ajustado conforme o peso real dos animais ao longo da sua vida.
+
+
+
+
+
+
+
+3.2. Relação Unidade de Gado Maior (UGM) x categoria animal
+
+
+Propomos que a base da composição e evolução seja calculada em número de cabeças e em unidade de gado maior (UMG), sendo que cada UGM equivale a 500 kg de peso vivo animal. Estima-se a UGM de acordo com a categoria animal à qual pertence (Tabela 1). Esta é apenas uma aproximação, sendo que deve ser ajustado conforme o peso real dos animais ao longo da sua vida.
+
+
+
+Tabela 1 - UGM de referência de acordo com a categoria animal.
@@ -1181,113 +1176,155 @@ Os dados da tabela abaixo resultam da estimativa de evolução de rebanho, de ac
-
-
-
-
-
-
-
-
-
-
-Categoria
-2004
-2005
-2006
-2007
-2008
-2009
+Cataegoria animal
+UGM
-Vacas
-0
-20
-20
-24
-24
-25
+Vacas em lactação
+1
-Novilhas
-20
-0
-4
-5
-5
-5
+Vacas secas
+1
-Terneiras
-0
-4
-5
-5
-5
-4
-
-
-
-
-Tcab
-20
-24
-29
-34
-34
-34
+Bezerras até 12 meses
+0.25
-TUGMs
-20.
-21.
-25.25
-30.5
-31.5
-31.75
+Novilhas até 18 meses
+0.75
-
-
-
-
-
-
-
+Novilhas até 24 meses
+0.75
+
+
+
+Outros
+1
+
+
+
+
+
+3.3. Composição do Rebanho
+
-@5$8=@2$8+@3$8+@4$8::@6$3=(@2$3*remote(Tab1,@2$2)+@3$3*remote(tab1,@3$2)+@4$3*remote(tab1,@4$2))::@6$4=(@2$4*remote(Tab1,@2$2)+@3$4*remote(tab1,@3$2)+@4$4*remote(tab1,@4$2))::@6$5=(@2$5*remote(Tab1,@2$2)+@3$5*remote(tab1,@3$2)+@4$5*remote(tab1,@4$2))::@6$6=(@2$6*remote(Tab1,@2$2)+@3$6*remote(tab1,@3$2)+@4$6*remote(tab1,@4$2))::@6$7=(@2$7*remote(Tab1,@2$2)+@3$7*remote(tab1,@3$2)+@4$7*remote(tab1,@4$2))::@6$8=(@2$8*remote(Tab1,@2$2)+@3$8*remote(tab1,@3$2)+@4$8*remote(tab1,@4$2))
+A composição do rebanho deve ser planejada para alcançar a máxima eficiência do sistema produtivo, sem presença de animais improdutivos. Estimar com exatidão a composição é tarefa difícil, pelo número de variáveis que podem afetá-la, mas teremos como foco alcançar composição apresentada na Tabela 2.
+
+
+
+Tabela 2. Composição ideal em porcentagem , número de animais e UGM, com base em 10 vacas em lactação.
+
+
+
+
+3.3.1. Parâmetros zootécnicos considerados para estimar a evolução do rebanho
+
+
+A evolução será baseada nos índices zootécnicos da raça, sendo:
+
+
+
+Necessidade de substituição
+Fêmeas nascidas
+Intervalo entre nascimento e primeiro parto
+Mortalidade
+Intervalo entre partos.
+Venda de animais excedentes bezerros (3 meses) e vacas de descarte
+
+
+
+Utilizamos os seguintes índices zootécnicos para estimar a evolução do rebanho do estabelecimento:
+
+
+
+Primeiro parto: 26 meses
+Intervalo entre partos: 14 meses
+Porcentagem de fêmeas nascidas: 80% (uso de sêmen sexado)
+Mortalidade de bezerras: menor que 5%
+Descarte de vacas: 10 a 15%
+
+
+
+Para equalizar a evolução entre os animais nascidos e necessários, serão vendidos os excedentes, na maioria dos casos na categoria bezerra.
-
-8. TODO Resolver exportar ou criar data.tabela. Para continuar, é necessário exportar a Tabela acima. Faço pelo menu Table - Export to file. Nome do Arquivo a exportar = Tabela$.csv.>>
-
-
-
-8.1. Gráfico resumo
-
+
+
+3.4. Composição inicial
+
+
+O estabelecimento não possui animais, sendo que o início da atividade se dará através da aquisição de 20 novilhas cobertas, da raça Jersey.
+
+
+
+Nota: o critério de seleção das novilhas deve permitir que os animais incorporados estejam saudáveis e possuam potencial produtivo acorde às necessidades da Fazenda Vitruvio: animais rústicos adaptados ao pastoreio e de produção de volume de leite médio, mas persistente durante a lactação
+
-
-8.2.
+
+
+
+3.5. Evolução
+
+
+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
+
+
+Também podemos observar a evolução do rebanho em formato de figura.
+
+
+
+Figura 1. Evolução do rebanho nos primeiros anos em formato de gráfico
+
+
+
+
+
+3.6. Entradas e saídas de animais do rebanho
+
+
+Os indicativos da evolução do rebanho, baseados nosíndicadores zootécnicos e manejo recomendado, oferecem a oportunidade de comercialização (venda) de animais excedentes. A opção dos proprietários deste estabelecimentos, é que os animais sejam vendidos quando ainda jovens (3 meses aproximadamente), e vacas de descarte. A quantidade de ano em que os excedentes estão previstos consta na tabela 4.
+
+
+
+Tabela 4 - Resumo das entradas e saídas de animais nos primeiros anos do projeto
+
+
+
+
+
+
+
+4. Referências
+
Date: 08-31-2023
diff --git a/data/ResEvolVit.png b/data/ResEvolVit.png
index a9b9bfa..0ba1112 100644
Binary files a/data/ResEvolVit.png and b/data/ResEvolVit.png differ
diff --git a/data/ResumoEntraSaiVitruvio.csv b/data/ResumoEntraSaiVitruvio.csv
index 59195ac..1af7031 100644
--- a/data/ResumoEntraSaiVitruvio.csv
+++ b/data/ResumoEntraSaiVitruvio.csv
@@ -1,10 +1,11 @@
-Categoria,2004,2005,2006,2007,2008,2009
+Categoria,2023,2024,2025,2026,2027,2028
Vacas entradas,0,0,0,0,0,0
Novilhas entradas,20,0,0,0,0,0
Terneiras entradas,0,0,0,0,0,0
Total entradas,20,0,0,0,0,0
-Vacas saídas,0,0,0,2,5,4
+Vacas saídas,0,0,0,0,3,2
Novilhas saídas,0,0,0,0,0,0
-Terneiras saídas,0,4,10,11,11,11
-Total saídas,0,4,10,13,16,15
+Terneiras saídas,0,4,11,14,14,15
+Total saídas,0,4,11,14,17,17
+,,,,,,
,,,,,,
diff --git a/data/ResumoEvolucaoVitruvio.csv b/data/ResumoEvolucaoVitruvio.csv
index a772681..70ea236 100644
--- a/data/ResumoEvolucaoVitruvio.csv
+++ b/data/ResumoEvolucaoVitruvio.csv
@@ -1,7 +1,7 @@
-Categoria,2004,2005,2006,2007,2008,2009
-Vacas,0,20,20,22,22,22
-Novilhas,20,0,4,5,4,4
-Terneiras,0,4,5,4,4,4
-T_cab,20,24,29,31,30,30
-T_UGMs,15.,21.,24.25,26.75,26.,26.
+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
,,,,,,
diff --git a/data/Tabela3.csv b/data/Tabela3.csv
deleted file mode 100644
index 41b8a4e..0000000
--- a/data/Tabela3.csv
+++ /dev/null
@@ -1,10 +0,0 @@
-Ano,2004,2005,2006,2007,2008,2009
-Vacas entradas,0,0,0,0,0,0
-Novilhas entradas,2,0,0,0,0,0
-Terneiras entradas,0,0,0,0,0,0
-Total entradas,2,0,0,0,2,0
-Vacas saídas,0,0,0,3,14,9
-Novilhas saídas,0,0,0,0,7,8
-Terneiras saídas,0,0,0,0,0,0
-Total saídas,0,0,0,3,14,17
-,,,,,,
diff --git a/data/Tabela4.csv b/data/Tabela4.csv
deleted file mode 100644
index 284d660..0000000
--- a/data/Tabela4.csv
+++ /dev/null
@@ -1,6 +0,0 @@
-Ano,2004,2005,2006,2007,2008,2009
-Vacas,20,27,35,40,40,40
-Novilhas,7,8,11,14,9,8
-Terneiras,8,11,14,16,16,16
-Total,35,46,60,70,63,64
-,,,,,,
diff --git a/doc/texte.md b/doc/texte.md
new file mode 100644
index 0000000..56ebba9
--- /dev/null
+++ b/doc/texte.md
@@ -0,0 +1,99 @@
+ ------------
+ DT
+ dplyr
+ data.table
+ stats
+ graphics
+ grDevices
+ utils
+ datasets
+ methods
+ base
+ ------------
+
+Composição e evolução do rebanho
+--------------------------------
+
+A composição do rebanho de cada estabelecimento varia conforme os
+objetivos, índices e manejo adotado. De modo geral, busca-se uma
+composição com maior participação de categorias produtivas, ou seja, em
+caso de atividade leiteira, busca-se maior número de animais na
+categoria **vacas em lactação**. Sua limitação geralmente está na
+capacidade de produção de alimentos na propriedade, ou ainda na
+capacidade de trabalho e das instalações. Como o objetivo da presente
+proposta visa explorar a atividade em sistema a base de pasto, sendo que
+a maior parte da alimentação prevista será produzida no estabelecimento,
+este será considerado o fator limitante. Da mesma forma, e evolução terá
+de respeitar o limite do estabelecimento, com incremento constante
+acompanhando as melhorias das pastagens. Propomos que a base da
+composição e evolução seja calculada em número de cabeças e em unidade
+de gado maior (UMG), sendo que cada UGM equivale a 500 kg de peso vivo
+animal. De maneira geral, estima-se a UGM de acordo com a categoria
+animal ao qual pertence (Tabela 1). Esta é apenas uma aproximação, sendo
+que deve ser ajustado conforme o peso real dos animais ao longo da sua
+vida.
+
+::: {#Tab1}
+ Cataegoria animal UGM
+ ----------------------- ------
+ Vacas em lactação 1
+ Vacas secas 1
+ Bezerras até 12 meses 0.25
+ Novilhas até 18 meses 0.75
+ Novilhas até 24 meses 0.75
+ Outros 1
+
+ : UGM de referência de acordo com a categoria animal
+:::
+
+Uma composição do rebanho deve ser planejada para alcançar a máxima
+eficiência do sistema produtivo, sem presença de animais improdutivos.
+Estimar com exatidão a composição é tarefa difícil, pelo número de
+variáveis que podem afetá-la, mas teremos como foco alcançar a seguinte
+composição (Tabela 2):
+
+E evolução será baseado nos índices zootécnicos da raça, sendo:
+necessidade de substituição; fêmeas nascidas; intervalo entre nascimento
+e primeiro parto, mortalidade e intervalo entre partos. Utilizamos os
+seguintes índices zootécnicos para estimar a evolução do rebanho do
+estabelecimento: . Primeiro Parto = 26 meses . Intervalo entre partos =
+14 meses . % de Fêmeas nascidas = 80% (uso de sêmen sexado) .
+Mortalidade de bezerras = menor que 5% . Descarte de vacas = 10 a 15%
+Para equalizar a evolução entre os animais nascidos e necessários, serão
+vendidos os excedentes, na maioria dos casos na categoria bezerra.
+
+Composição inicial
+------------------
+
+O estabelecimento não possui animais, sendo que o início da atividade se
+dará através da aquisição de 20 novilhas cobertas, da raça jersey.
+
+Evolução
+--------
+
+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 da tabela 3, e
+figura 1. ;\#+NAME:evolucao
+
+Também podemos observar a evolução do rebanho em formato de figura.
+
+\[\[file:../data/ResEvolVit.png\]\[Figura 1 - Evolução do rebanho em
+forma de gráfico\]
+
+Entradas e saídas de animais
+----------------------------
+
+Com os índices zootécnicos e a evolução do rebanho proposta, teremos uma
+movimentação de compra e venda de animais conforme tabela 4.
+
+``` {.example}
+ Categoria 2004 2005 2006 2007 2008 2009
+1: Vacas entradas 0 0 0 0 0 0
+2: Novilhas entradas 20 0 0 0 0 0
+3: Terneiras entradas 0 0 0 0 0 0
+4: Total entradas 20 0 0 0 20 0
+5: Vacas saídas 0 0 0 0 5 4
+6: Novilhas saídas 0 0 0 0 0 0
+7: Terneiras saídas 0 4 10 12 12 14
+8: Total saídas 0 4 10 12 17 18
+```
diff --git a/script/Evolucao.html b/script/Evolucao.html
deleted file mode 100644
index 0b88665..0000000
--- a/script/Evolucao.html
+++ /dev/null
@@ -1,1337 +0,0 @@
-
-
-
-
-
-
-
-Evolução de rebanho leiteiro em PRV
-
-
-
-
-
-
-
-
-
-
-Evolução de rebanho leiteiro em PRV
-
-Table of Contents
-
-
-- 1. Indices
-
-
-- 2. Resumo da evolução
-
-
-- 3. TODO Resolver exportar ou criar data.tabela. Para continuar, é necessário exportar a Tabela acima. Faço pelo menu Table - Export to file. Nome do Arquivo a exportar = Tabela$.csv.>>
-
-
-- 4. TODO - Resolver exportação figura no arquivo html
-- 5. Figuras (só para testar)
-
-
-
-
-#+TODO
-Continuar planilha
-#+startup 2023-08-02
-
-
-
-
-Vou estudar o emacs calc, tentando elaborar uma planilha para evolução do
-
-
-
-
-Vou utilizar os manuais on line https://orgmode.org/manual/Field-and-range-formulas.html
-e https://orgmode.org/org.html#Built_002din-Table-Editor
-
-
-
-1. Indices
-
-
-IP = intervalo entre partos (12 meses) (setq IP "12")
-
-
-
-PP = primeiro parto (24 meses) (setq PP "24")
-
-
-
-PL = PerÃodo de lactação (10 meses)(setq PL "10")
-'CL = capacidade de lotação (20UGM) (setq CL "20")
-'IndMor = Indice de mortalidade de bezerras
-'IRP = Ãndice de renovação do plantel - substituição de vacas velhas ou ruins
-
-
-
-
-Comnpisição ideal em número de animais por categoria:
-
-
-Table 1: UGM de referência de acordo com a categoria animal
-
-
-
-
-
-
-
-
-
-
-Cataegoria animal
-UGM
-abrev
-
-
-
-
-Vacas em lactação
-1
-vaca
-
-
-
-Vacas secas
-1
-vase
-
-
-
-Bezerras até 12 meses
-0.25
-Beze
-
-
-
-Novilhas até 18 meses
-0.50
-No18
-
-
-
-Novilhas até 24 meses
-0.75
-No24
-
-
-
-Outros
-1
-Outr
-
-
-
-
-
-Os dados acima são padronizados, sendo que, por padrão, 1 UGM equivale a 500 kg de peso vivo. Desta forma, pode ser necessário ajustar as UGMs e acordo com o peso dos animais de cada fazenda.
-
-
-
-Table 2: Composição ideal em porcentagem , número de animais e UGM, com base em 10 vacas em lactação.
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-Categoria de animais
-Cabeças
-%cab%
-UGM
-%UGM
-
-
-
-
-Vacas em lactação
-10
-47.6
-10
-60.6
-
-
-
-Vacas secas
-2
-9.5
-2
-12.1
-
-
-
-Bezerras ate 12 meses
-3
-14.3
-0.75
-4.5
-
-
-
-Novilhas até 18 meses
-3
-14.3
-1.5
-9.1
-
-
-
-Novilhas até 24 meses
-3
-14.3
-2.25
-13.6
-
-
-
-Outros animais
-
-0.0
-0
-0.0
-
-
-
-Total
-21
-100.0
-16.5
-100.0
-
-
-
-
-
-
-A composição do rebanho é dinâmico, com espectativa de crescimento ao longo do tempo, até alcançar o limite de suporte das pastagens
-ou de outro limitante definido pela infraestrutura ou de trabalho da fazenda. A espectativa de crescimento se deve à previsão de 1 parto anual
-por vaca, que gera um incremento anual de 50% de fêmeas em relação ao número de vacas, e do descarte de 25% das vacas.
-Quando for atingido o limite de vacas na fazenda, pode-se vender o excedente de fêmeas em idade de terneiras, novilhas prenhas, ou vacas,
-de acordo com a conveniência da fazenda. Entretanto, o limite é medido em UGM, o que também vai limitar a opção pela venda de animais maiores.
-Com base nos índices definidos em conjunto com a fazenda, estimamos que a evolução do rebanho de apresente conforme a tabela 3, ressalvando que
-esses valores não são absolutos, pois podem ocorrer imprevistos que alterem a evolução. Da mesma forma, havendo alteração nos índices esperados,
-haverá impacto na evolução do rebanho, o que não caracteriza necessariamente erro de previsão ou de manejo.
-
-
-
-
-
-
-1.1. Tabela Basede Constantes
-
-
-Os dados desta tabela deve ser alterados conforme necessário para alcançar a evolução do rebanho desejada.
-As tabelas de composição de rebanho serão calculadas automáticamente, com base nos dados anotados na tabela <Tab0>.
-
-
-Table 3: Entradas e saídas de animais do rebanho durante os primeiros 6 anos (até estabilizar)
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-Constante
-ano 1
-ano 2
-ano 3
-ano 4
-ano 5
-ano ..
-observação
-
-
-
-
-
-Partos por vaca ano
-1
-1
-1
-1
-1
-1
-
-
-
-
-
-
-Vacas Existentes
-20
--
--
--
--
--
-- a calcular
-
-
-
-
-Novilhas (12 a 24) existentes
-05
--
--
--
--
--
-- a calcular
-
-
-
-
-Bezerras existentes
-0
--
--
--
--
--
-- a calcular
-
-
-
-
-
-Novilhas para vacas
-0
-0
-5
-5
-7
-7
-
-
-
-
-
-% Bezerras para novilhas
-0.4
-0.4
-0.4
-0.4
-0.4
-0.4
-com base no total de nascidos
-
-
-
-
-
-Vacas a vender
-0
-0
-0
-3
-3
-5
-
-
-
-
-
-Novilhas a vender (Num)
-0
-0
-0
-0
-7
-7
-
-
-
-
-
-Bezerras a vender
-0
-0
-1
-1
-1
-1
-
-
-
-
-
-
-Vacas a comprar
-0
-5
-0
-0
-0
-0
-
-
-
-
-
-Novilhas a comprar
-2
-0
-0
-0
-0
-0
-
-
-
-
-
-Bezerras a compras
-1
-1
-1
-1
-1
-1
-
-
-
-
-
-
-
-Com a evolução estimada através dos indicadores:
-. 1 parto por vaca por ano;
-. Primeiro parto aos 18 meses
-. Descarte de 25% das vacas a partir do 3º ano
-. Capacidade de suporte para 40 vacas
-. Aproveitamento de 40% dos nascidos para repsição
-Temos o seguinte:
->> Iniciamos com 20 vacas
->> No segundo ano serão compradas 2 novilhas
-
-
-
-
-Table 4: Composição do rebanho na fazenda VITRUVIO (ANO 1)
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-Categoria
-ExttAnt
-TIR
-Compra
-Venda
-Saldo
-TIC
-ExttFin
-
-
-
-
-VACAS >24
-20
-0
-0
-0
-20
-0
-20
-
-
-
-NOVILHAS 12<>24
-1
-5
-2
-0
-8
-0
-3
-
-
-
-BEZERRAS <12
-2
-8
-0
-0
-10
-10
-0
-
-
-
-Outros
-
-0
-0
-0
-
-0
-0
-
-
-
-
-Na tabela 3.1 consta o número de animais para cada categoria, com as ocorrencias do ano. No caso das vacas, não há alteração, visto que não há entradas, nem saídas, e o número inicial é o mesmo do final. No caso das novilhas, há movimentação, com a transferência interna de 5 (que passam de bezerras para novilhas), compra de 2, e transferência cedendo 5 para serem vacas no próximo ano. Assim, o ano inicia com 1 novilha, e termina com 3.
-
-
-
-
-
-
-Table 5: Composição do rebanho na fazenda VITRUVIO (ANO 2)
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-CATEGORIA
-EXTTANT
-TIR
-COMPRA
-VENDA
-SALDO
-TIC
-EXTTFIN
-
-
-
-
-VACAS >24
-20
-0
-5
-0
-25
-0
-25
-
-
-
-Novilhas 12<>24
-3
-10
-0
-0
-13
-13
-0
-
-
-
-Bezerras <12
-0
-10
-1
-0
-11
-11
-0
-
-
-
-outros
-1
-
-
-
-1
-
-1
-
-
-
-
-
-
-
-1.2. Comentários sobre tabela acima
-
-
-Na tabela 3.3 podemos observar…
-
-
-Table 6: Composição do rebanho na fazenda VITRUVIO (ANO 3)
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-CATEGORIA
-EXTTANT
-TIR
-COMPRA
-VENDA
-SALDO
-TIC
-EXTTFIN
-
-
-
-
-VACAS >24
-25
-13
-0
-0
-38
-0
-38
-
-
-
-Novilhas 12<>24
-0
-11
-0
-0
-11
-11
-0
-
-
-
-Bezerras <12
-0
-15
-1
-1
-15
-15
-0
-
-
-
-outros
-1
-
-
-
-1
-
-1
-
-
-
-
-
-
-
-1.3. Comentários da tabela acima
-
-
-Na tabela 3.4 …
-
-
-
-Table 7: Composição do rebanho na fazenda VITRUVIO (ANO 4)
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-CATEGORIA
-EXTTANT
-TIR
-COMPRA
-VENDA
-SALDO
-TIC
-EXTTFIN
-
-
-
-
-VACAS >24
-38
-11
-0
-3
-46
-0
-46
-
-
-
-Novilhas 12<>24
-0
-15
-0
-0
-15
-15
-0
-
-
-
-Bezerras <12
-0
-18
-1
-1
-18
-18
-0
-
-
-
-outros
-1
-
-
-
-1
-
-1
-
-
-
-
-
-
-
-1.4. Comentários da tabela acima
-
-
-na tabela 3.5
-
-
-
-
-:TABLEEXPORTFILE: Documents/Tabela 3.5.csv
-:TABLEEXPORTFORMAT: orgtbl-to-csv
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-CATEGORIA
-EXTTANT
-TIR
-COMPRA
-VENDA
-SALDO
-TIC
-EXTTFIN
-
-
-
-
-VACAS >24
-46
-15
-0
-3
-58
-0
-58
-
-
-
-Novilhas 12<>24
-0
-18
-0
-7
-11
-11
-0
-
-
-
-Bezerras <12
-0
-23
-1
-1
-23
-23
-0
-
-
-
-outros
-1
-
-
-
-1
-
-1
-
-
-
-
-
-e, finalmente, na tabela 3.6, a composição do rebanho no sexto ano após a implementeação e adoção do PRV na propriedade VITRUVIO.
-
-
-
-
-Table 8: Composição do rebanho na fazenda VITRUVIO (ANO 6)
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-CATEGORIA
-EXTTANT
-TIR
-COMPRA
-VENDA
-SALDO
-TIC
-EXTTFIN
-
-
-
-
-VACAS >24
-58
-11
-0
-5
-64
-0
-64
-
-
-
-Novilhas 12<>24
-0
-23
-0
-7
-16
-16
-0
-
-
-
-Bezerras <12
-0
-26
-1
-1
-26
-26
-0
-
-
-
-outros
-1
-
-
-
-1
-
-1
-
-
-
-
-
-
-
-
-
-
-2. Resumo da evolução
-
-
-Esta tabela é a que efetivamente interessa para ser apresentada ao cliente, ou para análise técnica, pois apresenta o resumo (resultado da evolução) proposto para a fazenda.
-
-
-
-
-2.1. Tabela com os dados resumidos referente aos animais existentes anualmente
-
-
-Os dados da tabela abaixo resultam da estimativa de evolução de rebanho, de acordo com os dados da tabela de dados.
-
-
-
-:TABLEEXPORTFILE: Documents/Tabela4.csv
-:TABLEEXPORTFORMAT: orgtbl-to-csv
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-Ano
-2004
-2005
-2006
-2007
-2008
-2009
-
-
-
-
-Vacas
-20
-25
-38
-46
-58
-64
-
-
-
-Novilhas
-8
-13
-11
-15
-11
-16
-
-
-
-Terneiras
-10
-11
-15
-18
-23
-26
-
-
-
-
-
-
-
-
-3. TODO Resolver exportar ou criar data.tabela. Para continuar, é necessário exportar a Tabela acima. Faço pelo menu Table - Export to file. Nome do Arquivo a exportar = Tabela$.csv.>>
-
-
-
-3.0.1. Importação dos dados dos animais existentes
-
-
-getwd()
- library (data.table)
- Evol_exist <- fread("data/Tabela4.csv", check.names =FALSE, header=TRUE)
-# str(Evol_exist)
-#View(Evol_exist)
-#Transpor a tabela
-Evol_exist1<-dcast(melt(Evol_exist, id.vars="Ano"),variable ~Ano)
-# deu um trabalho para n ão aparecer uma linha nova com os nomes da colunas...
-str(Evol_exist1)
-
-
-
-
-
-
-
-3.0.2. Gráfico da evolução do rebanho
-
-
-
-3.1. Gráfico 1
-
-
-#+BEGINsrc R :file /evol1.png :results file graphics
-library (ggplot2)
-
-
-
-Evol1<-ggplot(Evolexist1,
- aes(x as.numeric(variable)))+
- geom_line ( aes (y = Vacas),col"red")+
- geomline (aes(y=Novilhas), col="blue")+
- geomline (aes(y=Terneiras), col="green")+
- themebw()
-Evol1
-ENDsrc
-
-
-
-file /Evol1.png
-
-
-
-
-
-
-4. TODO - Resolver exportação figura no arquivo html
-
-
-
-
-5. Figuras (só para testar)
-
-
-Exemplo 2
-
-
-https://nuvem.multifarm.top/apps/files/?dir=/Photos&openfile=457851
-
-
-
-
-Exemplo 3 -
-#+beginexport html
-<div id="subtittle" style="float: center; text-aling:center;">
-<p>
-<font size="1"> Composição do rebanho. Nes propriedade, os animais são divididos em dois lotes para o pastoreio.</font>
-</p>
-<p>
-<a href="http://multifarm.top">
-<img src= "https://nuvem.multifarm.top/apps/files/?dir=/Photos&openfile=457848" width = "250"/>
-</a>
-</p>
-</div>
-#+endexport>
-
-
-
-
-
-
diff --git a/script/EvolucaoVitruvio.R b/script/EvolucaoVitruvio.R
deleted file mode 100644
index adb672f..0000000
--- a/script/EvolucaoVitruvio.R
+++ /dev/null
@@ -1,39 +0,0 @@
-# data: 2023-10-25
-
-library(data.table)
-library(tidyr)
-library(dplyr)
-library(ggplot2)
-
-# Nota: iniciar uma sessão de R desde o diretório "script" para carregar a tabela com o seguinte caminho relativo ("../data/Tabela4.csv"):
-
-Evol_exist <- fread("../data/Tabela4.csv", check.names=FALSE, header=TRUE)
-
-str(Evol_exist)
-
-# Transpor a tabela
-
-Evol_exist1 <- dcast(melt(Evol_exist, id.vars = "Ano"), variable ~Ano)
-
-# deu um trabalho para n ão aparecer uma linha nova com os nomes da colunas...
-
-str(Evol_exist1)
-
-Evoluc <- Evol_exist1 %>%
- pivot_longer(!variable, names_to="Categoria", values_to="Cabecas") %>%
- dplyr::mutate(Ano=variable)
-
-#View(Evoluc)
-str(Evoluc)
-
-Evoluc <- ggplot(Evoluc, aes(x=Ano, y=Cabecas, group = Categoria)) +
- geom_line (aes(color=Categoria)) +
- geom_point(aes(color=Categoria))
-
-getwd()
-
-png(filename = "fig/Evoluc1.png")
-
-plot(Evoluc)
-
-Evoluc
diff --git a/script/EvolucaoVitruvio.org b/script/EvolucaoVitruvio.org
index e795f47..bba7071 100644
--- a/script/EvolucaoVitruvio.org
+++ b/script/EvolucaoVitruvio.org
@@ -1,5 +1,5 @@
#+Title:Evolução de rebanho leiteiro em PRV
-#+AUTHOR: Adenor Wendling
+#+AUTHOR: Adenor Wendling, José Brann e Ana Laura Carille
#+DATE: 08-31-2023
#+OPTIONS: creator:nil timestamp:nil
#+PROPERTY: header-args:R :results output :session *R2* :cmdline :tangle yes
@@ -12,56 +12,17 @@
#+HTML_HEAD:
#+HTML_HEAD:
+O arquivo será dividido em duas partes. A primeira *O SCRIPT* contem as tabelas e fórmulas que devem ser usadas para efetuar as projeções da evolução. A segunda parte *Texto sugestão* contém uma sugestão de texto para ser inserido no *projeto*. Este texto deverá ser transferido, e finalizado na wiki ou no documento final.
+* O SCRIPT
+#+begin_src R :exports none
+ library(data.table)
+ library(dplyr)
+ library(flextable)
+ library(tidyr)
+ #+end_src
-** TODO
-
-Continuar planilha
-#+startup 2023-08-02
-
-
-Vou estudar o emacs calc, tentando elaborar uma planilha para evolução do
-
-
-
-Vou utilizar os manuais on line
-e
-
-** Índices
-
-IP = intervalo entre partos (12 meses) (setq IP "12")
-
-PP = primeiro parto (24 meses) (setq PP "24")
-
-PL = PerÃodo de lactação (10 meses)(setq PL "10")
-
-CL = capacidade de lotação (20UGM) (setq CL "20")
-IndMor = Indice de mortalidade de bezerras
-IRP = Índice de renovação do plantel - substituição de vacas velhas ou ruins
-
-
-** Relação UGM e categoria animal
-
-#+Caption: UGM de referência de acordo com a categoria animal
-#+NAME: Tab1
-| Cataegoria animal | UGM | abrev |
-|-----------------------+------+-------|
-| Vacas em lactação | 1 | vaca |
-| Vacas secas | 1 | vase |
-| Bezerras até 12 meses | 0.25 | Beze |
-| Novilhas até 18 meses | 0.75 | No18 |
-| Novilhas até 24 meses | 0.75 | No24 |
-| Outros | 1 | Outr |
-|-----------------------+------+-------|
-
-Os dados acima são padronizados, sendo que, por padrão, 1 UGM equivale a 500 kg de peso vivo. Desta forma, pode ser necessário ajustar as UGMs e acordo com o peso dos animais de cada fazenda.
-
-** Composição do Rebanho
-
-A composição do rebanho de cada estabelecimento varia conforme os objetivos, índices e manejo adotado. De modo geral busca-se uma composição com maior participação de categorias produtivas, ou seja, em caso de atividade leiteira, busca-se maior número de animais na categoria *vacas em lactação*.
-Os dados da tabela 2 refletem a composição de um rebanho com finalidade de produção de leite, considerando um manejo reprodutivo e de alimentação excelentes.
-
-#+Caption: Composição ideal em porcentagem , número de animais e UGM, com base em 10 vacas em lactação.
+#+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
:TABLE_EXPORT_FORMAT: orgtbl-to-csv
@@ -80,70 +41,49 @@ Os dados da tabela 2 refletem a composição de um rebanho com finalidade de pro
|---+-----------------------+-------------+-------------+---------+---------|
#+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
+** área de Planejamento
-A composição do rebanho é dinâmico, com espectativa de crescimento ao longo do tempo, até alcançar o limite de suporte das pastagens
-ou de outro limitante definido pela infraestrutura ou de trabalho da fazenda. A espectativa de crescimento se deve à previsão de 1 parto anual
-por vaca, que gera um incremento anual de 50% de fêmeas em relação ao número de vacas, e do descarte de 25% das vacas.
-Quando for atingido o limite de vacas na fazenda, pode-se vender o excedente de fêmeas em idade de terneiras, novilhas prenhas, ou vacas,
-de acordo com a conveniência da fazenda. Entretanto, o limite é medido em UGM, o que também vai limitar a opção pela venda de animais maiores.
-Com base nos índices definidos em conjunto com a fazenda, estimamos que a evolução do rebanho de apresente conforme a tabela 3, ressalvando que
-esses valores não são absolutos, pois podem ocorrer imprevistos que alterem a evolução. Da mesma forma, havendo alteração nos índices esperados,
-haverá impacto na evolução do rebanho, o que não caracteriza necessariamente erro de previsão ou de manejo.
-
-
-
-** Tabela inicial, com o dimensionamento atual e previsão de entradas e saídas de animais
-
-Os dados desta tabela deve ser alterados conforme necessário para alcançar a evolução do rebanho desejada.
-As tabelas de composição de rebanho serão calculadas automáticamente, com base nos dados anotados na tabela .
+*** Tabela inicial, com o dimensionamento atual e previsão de entradas e saídas de animais
+## Os dados desta tabela deve ser alterados conforme necessário para alcançar a evolução do rebanho desejada.
+## As tabelas de composição de rebanho serão calculadas automáticamente, com base nos dados anotados na tabela .
#+Caption: Entradas e saídas de animais do rebanho durante os primeiros 6 anos (até estabilizar)
#+NAME:Tab0
-| | Constante | ano 1 | ano 2 | ano 3 | ano 4 | ano 5 | ano .. | observação |
-|---+------------------------+-------+-------+-------+-------+-------+--------+--------------|
-| | Partos/vaca/ano | 1 | 1 | 1 | 1 | 1 | 1 | |
-| ^ | | PV1 | PV2 | PV3 | PV4 | PV5 | PV6 | |
-|---+------------------------+-------+-------+-------+-------+-------+--------+--------------|
-| | Vacas Existentes | 00 | - | - | - | - | - | - a calcular |
-| ^ | | VE1 | | | | | | |
-| | Novilhas exist. | 00 | - | - | - | - | - | - a calcular |
-| ^ | | NE1 | | | | | | |
-| | Bezerras existentes | 0 | - | - | - | - | - | - a calcular |
-| ^ | | TE1 | | | | | | |
-|---+------------------------+-------+-------+-------+-------+-------+--------+--------------|
-| | Novilhas >- vacas | 0 | 0 | 0 | 0 | 0 | 0 | NÃO ALTERAR |
-| ^ | | TN1 | TN2 | TN3 | TN4 | TN5 | TN6 | |
-| | % 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 | 2 | 5 | 4 | |
-| ^ | | 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 | 10 | 11 | 11 | 11 | |
-| ^ | | BV1 | BV2 | BV3 | BV4 | BV5 | BV6 | |
-|---+------------------------+-------+-------+-------+-------+-------+--------+--------------|
-| | Vacas a comprar | 0 | 0 | 0 | 0 | 0 | 0 | |
-| ^ | | VC1 | VC2 | VC3 | VC4 | VC5 | VC6 | |
-| | Novilhas a comprar | 20 | 0 | 0 | 0 | 0 | 0 | |
-| ^ | | NC1 | NC2 | NC3 | NC4 | NC5 | NC6 | |
-| | Bezerras a compras | 0 | 0 | 0 | 0 | 0 | 0 | |
-| ^ | | BC1 | BC2 | BC3 | BC4 | BC5 | BC6 | |
-|---+------------------------+-------+-------+-------+-------+-------+--------+--------------|
+| | Constante | 2023 | 2024 | 2025 | 2026 | 2027 | 2028 | observação |
+|---+------------------------+------+------+------+------+------+------+--------------|
+| | Partos/vaca/ano | 1 | 1 | 1 | 1 | 1 | 1 | |
+| ^ | | PV1 | PV2 | PV3 | PV4 | PV5 | PV6 | |
+|---+------------------------+------+------+------+------+------+------+--------------|
+| | Vacas Existentes | 00 | - | - | - | - | - | - a calcular |
+| ^ | | VE1 | | | | | | |
+| | Novilhas exist. | 00 | - | - | - | - | - | - a calcular |
+| ^ | | NE1 | | | | | | |
+| | Bezerras existentes | 0 | - | - | - | - | - | - a calcular |
+| ^ | | TE1 | | | | | | |
+|---+------------------------+------+------+------+------+------+------+--------------|
+| | Novilhas >- vacas | 0 | 0 | 0 | 0 | 0 | 0 | NÃO ALTERAR |
+| ^ | | TN1 | TN2 | TN3 | TN4 | TN5 | TN6 | |
+| | % 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 | |
+| ^ | | 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 | |
+| ^ | | BV1 | BV2 | BV3 | BV4 | BV5 | BV6 | |
+|---+------------------------+------+------+------+------+------+------+--------------|
+| | Vacas a comprar | 0 | 0 | 0 | 0 | 0 | 0 | |
+| ^ | | VC1 | VC2 | VC3 | VC4 | VC5 | VC6 | |
+| | Novilhas a comprar | 20 | 0 | 0 | 0 | 0 | 0 | |
+| ^ | | NC1 | NC2 | NC3 | NC4 | NC5 | NC6 | |
+| | Bezerras a compras | 0 | 0 | 0 | 0 | 0 | 0 | |
+| ^ | | BC1 | BC2 | BC3 | BC4 | BC5 | BC6 | |
+|---+------------------------+------+------+------+------+------+------+--------------|
-Com a evolução estimada através dos indicadores:
-. 1 parto por vaca por ano;
-. Primeiro parto aos 18 meses
-. Descarte de 25% das vacas a partir do 3º ano
-. Capacidade de suporte para 40 vacas
-. Aproveitamento de 40% dos nascidos para repsição
-Temos o seguinte:
->> Iniciamos com 20 vacas
->> Compramos 5 novilhas cobertas
->> No segundo ano serão compradas 2 novilhas
-
-
-** Composição anual do rebanho da fazenda
-*** Ano 1
+** Área dos calculos
+*** Composição anual do rebanho da fazenda
+;; Estas tabelas (Tab3_1 a Tab_3-2 servem para calcular a evolução, mas não serão incluidos no relatórios final)
+*** Ano 2023
#+Caption: Composição do rebanho na fazenda VITRUVIO (ANO 1)
#+NAME: Tab3_1
| | Categoria | ExttAnt | TIR | Compra | Venda | Saldo | TIC | ExttFin |
@@ -152,17 +92,16 @@ Temos o seguinte:
| ^ | | EAV | TRV | COV | VEV | SAV | TCV | EFV |
| # | NOVILHAS 12<>24 | 0 | 0 | 20 | 0 | 20 | 20 | 0 |
| ^ | | EAN | TRN | CON | VEN | SAN | TCN | EFN |
-| # | BEZERRAS <12 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |
+| # | BEZERRAS <12 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |
| ^ | | EAB | FRB | COB | VEB | SAB | TCB | EFB |
| # | Outros | | 0 | 0 | 0 | | 0 | 0 |
| ^ | | EAO | FRO | COO | VEO | SAO | TCO | EFO |
#+TBLFM: $EAV=remote(Tab0, $VE1)::$EFV=$SAV-$TCV::$SAV=$EAV+$TRV+$COV-$VEV::$TCN=($EAN+$TRN+$CON-$VEV)::$VEV=remote(Tab0, $VV1):: $EAN=remote(Tab0, $NE1)::$TRN=remote(Tab0, $TN1)::$CON=remote(Tab0, $NC1)::$VEN=remote(Tab0, $NV1)::$SAN=$EAN+$TRN+$CON-$VEN::$EFN=$SAN-$TCN::$EAB=remote(Tab0, $TE1)::$FRB=$EFV*remote(Tab0, $BA1);%.0f::$SAB=$EAB+$FRB+$COB-$VEB::$TCB=$SAB::$EFB=$SAB-$TCB
-Na tabela 4 consta o número de animais para cada categoria, com as ocorrencias do ano. No caso das vacas, não há alteração, visto que não há entradas, nem saídas, e o número inicial é o mesmo do final. No caso das novilhas, há movimentação, com a transferência interna de 5 (que passam de bezerras para novilhas), compra de 2, e transferência cedendo 5 para serem vacas no próximo ano. Assim, o ano inicia com 1 novilha, e termina com 3.
-*** Ano 2
+*** Ano 2024
#+Caption: Composição do rebanho na fazenda VITRUVIO (ANO 2)
#+NAME: Tab3_2
@@ -179,8 +118,8 @@ Na tabela 4 consta o número de animais para cada categoria, com as ocorrencias
|---+-----------------+---------+-----+--------+-------+-------+-----+---------|
#+TBLFM: $EAV=remote(Tab3_1, $EFV)::$TRV=remote(Tab3_1, $TCN)::$COV=remote(Tab0,$VC2)::$VEV=remote(Tab0, $VV2)::$SAV=$EAV+$TRV+$COV-$VEV::$EFV=$SAV::$EAN=remote(Tab3_1, $EFN)::$TRN=remote(Tab3_1, $TCB)::$CON=remote(Tab0,$NC2)::$VEN=remote(Tab0, $NV2)::$SAN=$EAN+$TRN+$CON-$VEN::$TCN=$SAN::$EFN=$SAN-$TCN::$EAB=remote(Tab3_1, $EFB)::$FRB=$EFV*remote(Tab0, $BA2);%.0f::$COB=remote(Tab0,$BC2)::$VEB=remote(Tab0,$BV2)::$SAB=$EAB+$FRB+$COB-$VEB::$TCB=$SAB::$EFB=$SAB-$TCB
- Comentários sobre tabela 5
-*** Ano 3
+
+*** Ano 2025
Na tabela 3.3 podemos observar...
#+Caption: Composição do rebanho na fazenda VITRUVIO (ANO 3)
@@ -191,43 +130,43 @@ 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 | 15 | 0 | 10 | 5 | 5 | 0 |
+| # | Bezerras <12 | 0 | 15 | 0 | 11 | 4 | 4 | 0 |
| ^ | | EAB | FRB | COB | VEB | SAB | TCB | EFB |
| # | outros | | | | | | | |
| ^ | | EAO | FRO | COO | VEO | SAO | TCO | EFO |
|---+-----------------+---------+-----+--------+-------+-------+-----+---------|
#+TBLFM: $EAV=remote(Tab3_2, $EFV)::$TRV=remote(Tab3_2, $TCN)::$COV=remote(Tab0,$VC3)::$VEV=remote(Tab0, $VV3)::$SAV=$EAV+$TRV+$COV-$VEV::$EFV=$SAV::$EAN=remote(Tab3_2, $EFN)::$TRN=remote(Tab3_2, $TCB)::$CON=remote(Tab0,$NC3)::$VEN=remote(Tab0, $NV3)::$SAN=$EAN+$TRN+$CON-$VEN::$TCN=$SAN::$EFN=$SAN-$TCN::$EAB=remote(Tab3_2, $EFB)::$FRB=$EFV*remote(Tab0, $BA3);%.0f::$COB=remote(Tab0,$BC3)::$VEB=remote(Tab0,$BV3)::$SAB=$EAB+$FRB+$COB-$VEB::$TCB=$SAB::$EFB=$SAB-$TCB
-Comentários sobre a tabela 6
-*** Ano 4
+
+*** Ano2026
#+Caption: Composição do rebanho na fazenda VITRUVIO (ANO 4)
#+NAME: Tab3_4
| | CATEGORIA | EXTTANT | TIR | COMPRA | VENDA | SALDO | TIC | EXTTFIN |
|---+-----------------+---------+-----+--------+-------+-------+-----+---------|
-| # | VACAS >24 | 20 | 4 | 0 | 2 | 22 | 0 | 22 |
+| # | VACAS >24 | 20 | 4 | 0 | 0 | 24 | 0 | 24 |
| ^ | | EAV | TRV | COV | VEV | SAV | TCV | EFV |
-| # | Novilhas 12<>24 | 0 | 5 | 0 | 0 | 5 | 5 | 0 |
+| # | Novilhas 12<>24 | 0 | 4 | 0 | 0 | 4 | 4 | 0 |
| ^ | | EAN | TRN | CON | VEN | SAN | TCN | EFN |
-| # | Bezerras <12 | 0 | 15 | 0 | 11 | 4 | 4 | 0 |
+| # | Bezerras <12 | 0 | 17 | 0 | 14 | 3 | 3 | 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
- Comentários da tabela 7
-*** Ano 5
+
+*** Ano 2027
#+NAME: Tab3_5
#+Caption: Composição do rebanho na fazenda VITRUVIO (ANO 5)
| | CATEGORIA | EXTTANT | TIR | COMPRA | VENDA | SALDO | TIC | EXTTFIN |
|---+-----------------+---------+-----+--------+-------+-------+-----+---------|
-| # | VACAS >24 | 22 | 5 | 0 | 5 | 22 | 0 | 22 |
+| # | VACAS >24 | 24 | 4 | 0 | 3 | 25 | 0 | 25 |
| ^ | | EAV | TRV | COV | VEV | SAV | TCV | EFV |
-| # | Novilhas 12<>24 | 0 | 4 | 0 | 0 | 4 | 4 | 0 |
+| # | Novilhas 12<>24 | 0 | 3 | 0 | 0 | 3 | 3 | 0 |
| ^ | | EAN | TRN | CON | VEN | SAN | TCN | EFN |
-| # | Bezerras <12 | 0 | 15 | 0 | 11 | 4 | 4 | 0 |
+| # | Bezerras <12 | 0 | 18 | 0 | 14 | 4 | 4 | 0 |
| ^ | | EAB | FRB | COB | VEB | SAB | TCB | EFB |
| # | outros | 1 | | | | 1 | | 1 |
| ^ | | EAO | FRO | COO | VEO | SAO | TCO | EFO |
@@ -235,21 +174,21 @@ Comentários sobre a tabela 6
| | | | | | | | | |
#+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
-Comentários da tabela 8
-*** Ano 6
-e, finalmente, na tabela 9, a composição do rebanho no sexto ano após a implementeação e adoção do PRV na propriedade VITRUVIO.
+
+*** Ano 2028
+
#+NAME:Tab3_6
#+caption: Composição do rebanho na fazenda VITRUVIO (ANO 6)
| | CATEGORIA | EXTTANT | TIR | COMPRA | VENDA | SALDO | TIC | EXTTFIN |
|---+-----------------+---------+-----+--------+-------+-------+-----+---------|
-| # | VACAS >24 | 22 | 4 | 0 | 4 | 22 | 0 | 22 |
+| # | VACAS >24 | 25 | 3 | 0 | 2 | 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 | 15 | 0 | 11 | 4 | 4 | 0 |
+| # | Bezerras <12 | 0 | 18 | 0 | 15 | 3 | 3 | 0 |
| ^ | | EAB | FRB | COB | VEB | SAB | TCB | EFB |
| # | outros | 1 | | | | | | |
| ^ | | EAO | FRO | COO | VEO | SAO | TCO | EFO |
@@ -257,22 +196,37 @@ e, finalmente, na tabela 9, a composição do rebanho no sexto ano após a imple
#+TBLFM: $EAV=remote(Tab3_5, $EFV)::$TRV=remote(Tab3_5, $TCN)::$COV=remote(Tab0,$VC6)::$VEV=remote(Tab0, $VV6)::$SAV=$EAV+$TRV+$COV-$VEV::$EFV=$SAV::$EAN=remote(Tab3_5, $EFN)::$TRN=remote(Tab3_5, $TCB)::$CON=remote(Tab0,$NC6)::$VEN=remote(Tab0, $NV6)::$SAN=$EAN+$TRN+$CON-$VEN::$TCN=$SAN::$EFN=$SAN-$TCN::$EAB=remote(Tab3_5, $EFB)::$FRB=$EFV*remote(Tab0, $BA6);%.0f::$COB=remote(Tab0,$BC6)::$VEB=remote(Tab0,$BV6)::$SAB=$EAB+$FRB+$COB-$VEB::$TCB=$SAB::$EFB=$SAB-$TCB
+** Área dos resumos dos cálculos
-** Resumo da evolução
+*** Animais existentes anualmente
+#+NAME:TABELA4
+#+CAPTION: Resumo da evolução do rebanho (Animais existentes anualmente) nos primeiros anos do projeto
+:PROPERTIES:
+: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 |
-Esta tabela é a que efetivamente interessa para ser apresentada ao cliente, ou para análise técnica, pois apresenta o resumo (resultado da evolução) proposto para a fazenda.
+#+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))
-Tabela com os dados resumidos referente aos animais existentes anualmente
-Os dados da tabela abaixo resultam da estimativa de evolução de rebanho, de acordo com os dados da tabela de dados.
-*** Entradas e saídas
+## A TABELA5 será incluída no documento final
+
+*** Entradas e saídas anuais de animais
#+NAME:TABELA5
#+CAPTION: Resumo das entradas e saídas de animais nos primeiros anos do projeto
:PROPERTIES:
:TABLE_EXPORT_FILE: ~/Documentos/GITs/Compos_rebanho/data/ResumoEntraSaiVitruvio.csv
:TABLE_EXPORT_FORMAT: orgtbl-to-csv
-:END:
-| | Categoria | 2004 | 2005 | 2006 | 2007 | 2008 | 2009 |
+:END:
+| | Categoria | 2023 | 2024 | 2025 | 2026 | 2027 | 2028 |
|---+--------------------+------+------+------+------+------+------|
| # | Vacas entradas | 0 | 0 | 0 | 0 | 0 | 0 |
| # | Novilhas entradas | 20 | 0 | 0 | 0 | 0 | 0 |
@@ -280,67 +234,133 @@ Os dados da tabela abaixo resultam da estimativa de evolução de rebanho, de ac
|---+--------------------+------+------+------+------+------+------|
| # | Total entradas | 20 | 0 | 0 | 0 | 0 | 0 |
|---+--------------------+------+------+------+------+------+------|
-| # | Vacas saídas | 0 | 0 | 0 | 2 | 5 | 4 |
+| # | Vacas saídas | 0 | 0 | 0 | 0 | 3 | 2 |
| # | Novilhas saídas | 0 | 0 | 0 | 0 | 0 | 0 |
-| # | Terneiras saídas | 0 | 4 | 10 | 11 | 11 | 11 |
+| # | Terneiras saídas | 0 | 4 | 11 | 14 | 14 | 15 |
|---+--------------------+------+------+------+------+------+------|
-| # | Total saídas | 0 | 4 | 10 | 13 | 16 | 15 |
+| # | Total saídas | 0 | 4 | 11 | 14 | 17 | 17 |
| # | | | | | | | |
|---+--------------------+------+------+------+------+------+------|
+| | | | | | | | |
#+TBLFM:@2$3=remote(Tab3_1, $COV)::@2$4=remote(Tab3_2, $COV)::@2$5=remote(Tab3_3, $COV)::@2$6=remote(Tab3_4, $COV)::@2$7=remote(Tab3_5, $COV)::@2$8=remote(Tab3_6, $COV)::@3$3=remote(Tab3_1, $CON)::@3$4=remote(Tab3_2, $CON)::@3$5=remote(Tab3_3, $CON)::@3$6=remote(Tab3_4, $CON)::@3$7=remote(Tab3_5, $CON)::@3$8=remote(Tab3_6, $CON)::@4$3=remote(Tab3_1, $COB)::@4$4=remote(Tab3_2, $COB)::@4$5=remote(Tab3_3, $COB)::@4$6=remote(Tab3_4, $COB)::@4$7=remote(Tab3_5, $COB)::@4$8=remote(Tab3_6, $COB)::@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=remote(Tab3_1, $VEV)::@6$4=remote(Tab3_2, $VEV)::@6$5=remote(Tab3_3, $VEV)::@6$6=remote(Tab3_4, $VEV)::@6$7=remote(Tab3_5, $VEV)::@6$8=remote(Tab3_6, $VEV)::@7$3=remote(Tab3_1, $VEN)::@7$4=remote(Tab3_2, $VEN)::@7$5=remote(Tab3_3, $VEN)::@7$6=remote(Tab3_4, $VEN)::@7$7=remote(Tab3_5, $VEN)::@7$8=remote(Tab3_6, $VEN)::@8$3=remote(Tab3_1, $VEB)::@8$4=remote(Tab3_2, $VEB)::@8$5=remote(Tab3_3, $VEB)::@8$6=remote(Tab3_4, $VEB)::@8$7=remote(Tab3_5, $VEB)::@8$8=remote(Tab3_6, $VEB)::@9$3=@6$3+@7$3+@8$3::@9$4=@6$4+@7$4+@8$4::@9$5=@6$5+@7$5+@8$5::@9$6=@6$6+@7$6+@8$6::@9$7=@6$7+@7$3+@8$7::@9$8=@6$8+@7$8+@8$8
-
-*** Animais existentes
-#+NAME:TABELA4
-#+CAPTION: Resumo da evolução do rebanho (Animais existentes anualmente) nos primeiros anos do projeto
-:PROPERTIES:
-:TABLE_EXPORT_FILE: ~/Documentos/GITs/Compos_rebanho/data/ResumoEvolucapVitruvio.csv
-:TABLE_EXPORT_FORMAT: orgtbl-to-csv
-:END:
-| | Categoria | 2004 | 2005 | 2006 | 2007 | 2008 | 2009 |
-|---+-----------+------+------+-------+-------+------+------|
-| # | Vacas | 0 | 20 | 20 | 22 | 22 | 22 |
-| # | Novilhas | 20 | 0 | 4 | 5 | 4 | 4 |
-| # | Terneiras | 0 | 4 | 5 | 4 | 4 | 4 |
-|---+-----------+------+------+-------+-------+------+------|
-| # | T_cab | 20 | 24 | 29 | 31 | 30 | 30 |
-| # | T_UGMs | 15. | 21. | 24.25 | 26.75 | 26. | 26. |
-| # | | | | | | | |
-#+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))
-
-*** TODO Resolver exportar ou criar data.tabela [%]
-
-- Para continuar, é necessário exportar a Tabela acima. Faço pelo menu Table - Export to file. Nome do Arquivo a exportar = Tabela$.csv.>>
+## Para exportar a tabela > M-x org-tabel-export (enter) "path" y, ,..
-** Gráfico resumo
+*** Gráfico resumo
#+NAME: Ler data.table Resumo
#+begin_src R :exports results
- library(data.table)
- library(tidyr)
- library(dplyr)
+REV<-fread("../data/ResumoEvolucaoVitruvio.csv", header=TRUE)
+ REv<- REV%>%
+ pivot_longer (cols=c("2023", "2024", "2025", "2026", "2027", "2028"),
+ names_to="Ano",
+ values_to="Quantidade",
+ values_drop_na = TRUE )
- REV <- fread("../data/ResumoEvolucaoVitruvio.csv", header=TRUE)
+ REv$Ano=as.numeric(REv$Ano)
+ #View(REv)
+ #+end_src
- REv <- REV %>%
- pivot_longer(cols = c("2004", "2005", "2006", "2007", "2008", "2009"),
- names_to = "Ano",
- values_to = "Quantidade",
- values_drop_na = TRUE )
+ ** Gráfico para uso
+ #+NAME: grafico resumo
+ #+begin_src R :grafResum.png
+ library (ggplot2)
- REv$Ano <- as.numeric(REv$Ano)
+ ResEvolVit<-ggplot(REv, aes(Ano,
+ Quantidade,
+ colour=Categoria))+
+ geom_line()
+ ggsave("EvolucaoRebanho.png", ResEvolVit, path="~/Nextcloud/00-Projetos/01-Vitruvio/2023/04-Imagens/DocFinal", width=7, height=3, units="in")
+ #ResEvolVit
+ #+end_src
- str(REv)
+* Texto Sugestão
+** Composição e evolução do rebanho
+
+A composição do rebanho de cada estabelecimento varia conforme os objetivos, índices e manejo adotado. De modo geral, busca-se uma composição com maior participação de categorias produtivas, ou seja, em caso de atividade leiteira, busca-se maior número de animais na categoria *vacas em lactação*. Sua limitação geralmente está na capacidade de produção de alimentos na propriedade, ou ainda na capacidade de trabalho e das instalações.
+Como o objetivo da presente proposta visa explorar a atividade em sistema a base de pasto, sendo que a maior parte da alimentação prevista será produzida no estabelecimento, este será considerado o fator limitante.
+Da mesma forma, e evolução terá de respeitar o limite do estabelecimento, com incremento constante acompanhando as melhorias das pastagens.
+Propomos que a base da composição e evolução seja calculada em número de cabeças e em unidade de gado maior (UMG), sendo que cada UGM equivale a 500 kg de peso vivo animal. De maneira geral, estima-se a UGM de acordo com a categoria animal ao qual pertence (Tabela 1). Esta é apenas uma aproximação, sendo que deve ser ajustado conforme o peso real dos animais ao longo da sua vida.
+
+
+
+** Relação Unidade de Gado Maior (UGM) x categoria animal
+Propomos que a base da composição e evolução seja calculada em número de cabeças e em unidade de gado maior (UMG), sendo que *cada UGM equivale a 500 kg de peso vivo animal*. Estima-se a UGM de acordo com a categoria animal à qual pertence *(Tabela 1)*. Esta é apenas uma aproximação, sendo que deve ser ajustado conforme o peso real dos animais ao longo da sua vida.
+
+Tabela 1 - UGM de referência de acordo com a categoria animal.
+| Cataegoria animal | UGM |
+|-----------------------+------|
+| Vacas em lactação | 1 |
+| Vacas secas | 1 |
+| Bezerras até 12 meses | 0.25 |
+| Novilhas até 18 meses | 0.75 |
+| Novilhas até 24 meses | 0.75 |
+| Outros | 1 |
+|-----------------------+------|
+
+
+** Composição do Rebanho
+A composição do rebanho deve ser planejada para alcançar a máxima eficiência do sistema produtivo, sem presença de animais improdutivos. Estimar com exatidão a composição é tarefa difícil, pelo número de variáveis que podem afetá-la, mas teremos como foco alcançar composição apresentada na *Tabela 2*.
+
+Tabela 2. Composição ideal em porcentagem , número de animais e UGM, com base em 10 vacas em lactação.
+
+*** Parâmetros zootécnicos considerados para estimar a evolução do rebanho
+
+A evolução será baseada nos índices zootécnicos da raça, sendo:
+
+ Necessidade de substituição
+ Fêmeas nascidas
+ Intervalo entre nascimento e primeiro parto
+ Mortalidade
+ Intervalo entre partos.
+ Venda de animais excedentes bezerros (3 meses) e vacas de descarte
+
+Utilizamos os seguintes índices zootécnicos para estimar a evolução do rebanho do estabelecimento:
+
+ Primeiro parto: 26 meses
+ Intervalo entre partos: 14 meses
+ Porcentagem de fêmeas nascidas: 80% (uso de sêmen sexado)
+ Mortalidade de bezerras: menor que 5%
+ Descarte de vacas: 10 a 15%
+
+Para equalizar a evolução entre os animais nascidos e necessários, serão vendidos os excedentes, na maioria dos casos na categoria bezerra.
+
+
+** Composição inicial
+
+O estabelecimento não possui animais, sendo que o início da atividade se dará através da aquisição de 20 novilhas cobertas, da raça Jersey.
+
+ Nota: o critério de seleção das novilhas deve permitir que os animais incorporados estejam saudáveis e possuam potencial produtivo acorde às necessidades da Fazenda Vitruvio: animais rústicos adaptados ao pastoreio e de produção de volume de leite médio, mas persistente durante a lactação
+
+
+
+** Evolução
+
+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
+#+begin_src R :exports results
+ #library(ascii) # exports result as org file
+ Evolucao <- fread("../data/ResumoEvolucaoVitruvio.csv", header=TRUE)
+
+ ft1 <- flextable(Evolucao)
+ ft1 <- set_caption(ft1,"Evolucao do rebanho durante os primeiros anos.")
+ ft1 <- width(ft1,width=1.05)
+
+ print(theme_alafoli(ft1))
#+end_src
-#+NAME: grafico resumo
-#+begin_src R :grafResum.png :results graphics file
+#+RESULTS:
- library (ggplot2)
+Também podemos observar a evolução do rebanho em formato de figura.
- ResEvolVit <- ggplot(REv, aes(Ano, Quantidade, colour=Categoria)) +
- geom_line()
+Figura 1. Evolução do rebanho nos primeiros anos em formato de gráfico
+
+[[file:~/Nextcloud/00-Projetos/01-Vitruvio/2023/04-Imagens/DocFinal/EvolucaoRebanho.png][link do gráfico]]
- ggsave("ResEvolVit.png", ResEvolVit, path="../data/", width=7, height=3,
- units="in")
+** Entradas e saídas de animais do rebanho
+Os indicativos da evolução do rebanho, baseados nosíndicadores zootécnicos e manejo recomendado, oferecem a oportunidade de comercialização (venda) de animais excedentes. A opção dos proprietários deste estabelecimentos, é que os animais sejam vendidos quando ainda jovens (3 meses aproximadamente), e vacas de descarte. A quantidade de ano em que os excedentes estão previstos consta na tabela 4.
-#+end_src
+Tabela 4 - Resumo das entradas e saídas de animais nos primeiros anos do projeto
+
+
+* Referências