Alterações para figura e files

2023-09-28 14:39:10 -03:00
parent 9254d1d9ee
commit ad7eec5891
2 changed files with 12 additions and 5 deletions
--- 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: