\documentclass[a4paper, oneside, 10pt]{article}
\usepackage[unicode]{hyperref}
\usepackage[utf8x]{inputenc}
\usepackage[english]{babel}
\date{\today}
\title{}
\author{}
\begin{document}



\section{\texorpdfstring{Mônica Antunes Ulysséa}{Monica Antunes Ulyssea}}
\label{sec:monica_antunes_ulyssea}


Mestranda do Programa de Pós-graduação em Zoologia da Universidade Estadual de Feira de Santana, UEFS. Laboratório de Hymenoptera do MZUSP.

Tese: \emph{Estrutura de guildas em Formigas associadas à serrapilheira de Caatingas arbóreas}.

Orientador: Carlos Roberto Ferreira Brandão.

\section{\texorpdfstring{Exercícios}{Exercicios}}
\label{sec:exercicios}


\href{media/bie5782/01_curso_atual/alunos/trabalho_final/monica/exercicio1.r}{exercicio1F}
\href{media/bie5782/01_curso_atual/alunos/trabalho_final/monica/exercicio2final.r}{exercicio2F}
\href{media/bie5782/01_curso_atual/alunos/trabalho_final/monica/exercico3f.r}{exercicio3F}
\href{media/bie5782/01_curso_atual/alunos/trabalho_final/monica/exercico4.r}{exercico4.r}
\href{media/bie5782/01_curso_atual/alunos/trabalho_final/monica/exercicio5f.r}{exercicio5f.r}
\href{media/bie5782/01_curso_atual/alunos/trabalho_final/monica/exercicio6.r}{exercicio6P}
\href{media/bie5782/01_curso_atual/alunos/trabalho_final/monica/exercicio7f.r}{exercicio7F}
\href{media/bie5782/01_curso_atual/alunos/trabalho_final/monica/exercicio8f.r}{exercicio8F}
\href{media/bie5782/01_curso_atual/alunos/trabalho_final/monica/exercicio9f.r}{exercicio9F}

\section{\texorpdfstring{Propostas de trabalho final}{Propostas de trabalho final}}
\label{sec:propostas_de_trabalho_final}


\subparagraph{\texorpdfstring{A}{A}}
\label{sec:a}


\textbf{Alterada pós-comentário}\\
Criar uma função que:\\
- faça a análise de regressão linear simples entre 12 medidas morfológicas tomadas de X espécimes de formigas (nº que varia de 1 a 10 de acordo com a espécie) e a medida de tamanho total do corpo da espécie. 
- retorne um objeto com o sumário (para sabermos se a regressão é significativa) de todas as análises de regressão.

\subparagraph{\texorpdfstring{B}{B}}
\label{sec:b}


Criar uma função que calcule a média de cada uma da 12 medidas morfológicas tomadas de X espécimes (nº que varia de 1 a 10 de acordo com a espécie) para cada uma das 101 espécies de formigas coletadas e colocar o resultado em uma tabela. 

\subparagraph{\texorpdfstring{Comentários}{Comentarios}}
\label{sec:comentarios}


A proposta A é boa, e pode servir para qualquer conjunto de dados de medidas. Tente generalizar a função para que mais pessoas tenham interesse nela. Defina o seu output (o tipo de gráfico), e os passos para chegar nele.

Sua proposta B está muito simples.

\textbf{ Gabriel }

\section{\texorpdfstring{Trabalho final}{Trabalho final}}
\label{sec:trabalho_final}


\subparagraph{\texorpdfstring{Código da função}{Codigo da funao}}
\label{sec:codigo_da_funao}


analise $\leftarrow$ function(x)  
\begin{verbatim}
{
 if(is.matrix(x)==FALSE)
      {
       xmatrix=as.matrix(x)
       }
     else(is.matrix(x)==TRUE)
      {
       xmatrix=x
       }
     par(mfrow=c(3, 4))
     for(i in 1:12)
     {
      plot(xmatrix[,i]~xmatrix[,13], ylab=colnames(dados[i]), xlab=colnames(dados[13]), main="RLS", cex.main=1)
      abline(lm(xmatrix[,i]~xmatrix[,13]), col="red")
      }
     sumario=vector("list", length=12)
     for(i in 1:12)
     {
      sumario[[i]]=summary(lm(xmatrix[,i]~xmatrix[,13]))
      }
     par(mfrow=c(1, 1))
     return(sumario) 
     }
\end{verbatim}


\subparagraph{\texorpdfstring{Código comentado da função}{Codigo comentado da funao}}
\label{sec:codigo_comentado_da_funao}


\href{media/bie5782/01_curso_atual/alunos/trabalho_final/monica/trabalhofinalcodigocomentado.r}{trabalhofinalcodigocomentado.r}

\subparagraph{\texorpdfstring{Arquivo da função}{Arquivo da funao}}
\label{sec:arquivo_da_funao}


\href{media/bie5782/01_curso_atual/alunos/trabalho_final/monica/trabalhofinalscript.r}{trabalhofinalscript.r}

\subparagraph{\texorpdfstring{Página de ajuda}{Pagina de ajuda}}
\label{sec:pagina_de_ajuda}


analise			      package:nenhum			R Documentation

Analise de regressão linear simples entre 12 variaveis e uma variável fixa. 

Description:

Retorna os gráficos das relações entre variáveis com o plote da linha da análise de regressão linear simples
e também o sumário das análises de regressões feitas para podermos observar o p valor.

Usage:
\begin{verbatim}
analise <- function(x)
\end{verbatim}


Arguments:
\begin{verbatim}
 x: objeto da classe data.frame ou matrix com valores de distintas variáveis. 
\end{verbatim}


Details: 

Seu objeto deve ser construído a partir de uma tabela de dados que apresente
as variáveis em colunas e as observações de cada espécime nas linhas.
São usadas 13 variáveis e a última delas é a variável fixa. Ou seja, cada uma
das 12 variáveis será avaliada com relaçao a variável fixa por meio da 
análise de regressão linear simples.

Value:

São gerados um conjunto de 12 gráficos para a análise exploratória de regressão
linear simples entre as 12 variaveis e a variável fixa, e um objeto da classe lista
que contém o sumario das regressões, onde podemos observar a significância das mesmas.

Author(s):
Mônica Antunes Ulysséa
moniqueta\_poliqueta@yahoo.com.br

References:

Gotelli, N.J. and Ellison, A.M. 2004. A Primer of Ecological Statistics. Sinauer Associates, Inc., Sunderland, MA, 510p.
Fox, J. 2002. An R and S-Plus Companion to Applied Regression. Sage Publications, Thousand Oaks, CA, USA, xvi+312p.

See Also: lm(), plot(), par(), is(), as()

Examples:

dados $\leftarrow$ read.table(,,Dados.txt", header=TRUE, as.is=TRUE, sep=,,\textbackslash{}t")\\
dados\\
analise(dados)\\

\subparagraph{\texorpdfstring{Dados para rodar o exemplo}{Dados para rodar o exemplo}}
\label{sec:dados_para_rodar_o_exemplo}


\href{media/bie5782/01_curso_atual/alunos/trabalho_final/monica/dados.txt}{dados.txt}

\end{document}
