From ad7eec589148bf04a0029bb82f074d2c24b3888f Mon Sep 17 00:00:00 2001
From: Adenor <adenor20@disroot.org>
Date: Thu, 28 Sep 2023 14:39:10 -0300
Subject: [PATCH] =?UTF-8?q?Altera=C3=A7=C3=B5es=20para=20figura=20e=20file?=
 =?UTF-8?q?s?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 EvolucaoVitruvio.org | 8 +++++++-
 data/Tabela4.csv     | 9 +++++----
 2 files changed, 12 insertions(+), 5 deletions(-)

diff --git a/EvolucaoVitruvio.org b/EvolucaoVitruvio.org
index 60eccea..c706185 100644
--- a/EvolucaoVitruvio.org
+++ b/EvolucaoVitruvio.org
@@ -331,8 +331,14 @@ library(dplyr)
   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
+
+
+
 #+end_src
 
 #+RESULTS:
diff --git a/data/Tabela4.csv b/data/Tabela4.csv
index e5507df..3178b76 100644
--- a/data/Tabela4.csv
+++ b/data/Tabela4.csv
@@ -1,5 +1,6 @@
 Ano,2004,2005,2006,2007,2008,2009
-Vacas,20,25,40,48,61,68
-Novilhas,7,15,11,16,12,17
-Terneiras,8,11,16,19,24,27
-Total,35,51,67,83,92,112
+Vacas,20,20,35,40,40,40
+Novilhas,7,15,8,14,9,8
+Terneiras,8,8,14,16,16,16
+Total,35,43,57,70,63,64
+,,,,,,