diff --git a/EvolucaoVitruvio.org b/EvolucaoVitruvio.org
index f37bfed..6d2fe74 100644
--- a/EvolucaoVitruvio.org
+++ b/EvolucaoVitruvio.org
@@ -1,9 +1,10 @@
-
 #+Title:Evolução de rebanho leiteiro em PRV
 #+DESCRIPTION:
 #+LANGUAGE: portuguese
 #+AUTHOR: Adenor Wendling
 #+DATE: 08-31-2023
+#+PROPERTY: header-args:R :results output :session *R2* :cmdline :tangle yes
+#+PROPERTY: header-args:R+ :exports both
 #+SLUG: orgmode-excel
 #+TAGS: tabelas, org-mode, composição ideal 
 #+share: false
@@ -300,14 +301,14 @@ Os dados da tabela abaixo resultam da estimativa de evolução de rebanho, de ac
 * 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.>>
 
 *** Importação dos dados dos animais existentes
-#+BEGIN_src R  
+#+begin_src R  
   library (data.table)
   library(tidyr)
 library(dplyr)
   library (ggplot2)
-#+END_src
+#+end_src
 
-#+BEGIN_src R
+#+begin_src R
   Evol_exist <- fread("data/Tabela4.csv", check.names =FALSE, header=TRUE)
     str(Evol_exist)
   
@@ -321,7 +322,7 @@ library(dplyr)
   #View(Evoluc)
   str(Evoluc)
   
-#+END_src
+#+end_src
 
 
 *** Gráfico da evolução do rebanho