Universidade Federal do Paraná
Curso de Estatística
CE 083 - Estatística Computacional I - 2014/2
Prof. Dr. Walmes Marques Zeviani


Aula 19

Tabela de conteúdo


Edição de um documento LibreOffice+R

##-----------------------------------------------------------------------------
## Carregar o pacote odfWeave.

rm(list=ls())
require(odfWeave)

## Acesso à documentação do pacote.
## help(package="odfWeave", help_type="html")

##-----------------------------------------------------------------------------
## Criar objetos que serão usados dentro do documento do LibreOffice.

## Dia de execussão da análise.
dea <- format(Sys.time(), format="%d de %B de %Y às %H:%M")

## Dados pessoais. Usar `\Sexpr{nome}` para printar.
nome <- "Fulado de Tal"
prof <- "Bacharel em estatística"
email <- "fulano@detal.br"

##-----------------------------------------------------------------------------
## Tabelas e figuras para serem inseridas no documento.

## require(tables)
## tb <- tabular(data=iris, Sepal.Length*mean~Species); tb
args(tabular)

tb <- aggregate(
    cbind(Petal.Length, Petal.Width, Sepal.Length,
          Petal.Length)~Species,
    data=iris, FUN=mean)
tb

## Colocar dentro de um chunk com `echo=FALSE, results=xml`.
odfTableCaption("Média para comprimento e largura da sépala e pétala de flores Iris.")
odfTable(tb, useRowNames=FALSE)

pl <- function(){
    plot(Petal.Length~Petal.Width, data=iris,
         col=iris$Species, pch=19,
         xlab="Largura da pétala",
         ylab="Comprimento da pétala")
}

## Colocar em um chunk com `echo=FALSE, fig=TRUE`.
pl()

save.image("ce083-2014-02-aula19.RData")

##-----------------------------------------------------------------------------
## Fazendo a compilação - interpretação do código R dentro dos chunks.

odfWeave(file="ce083-2014-02-aula19in.odt", dest="ce083-2014-02-aula19out.odt")
getwd()

Figura 1. Print screen do documento com chunks não interpretados - LibreOffice Writer.

Figura 2. Print screen do documento com chunks interpretados, código, tabelas e figuras geradas - LibreOffice Writer.

Como o R seduz quando você sabe que ele se integra à documentos

Como você fica quando sabe que o R se integra à documentos