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



\section{\texorpdfstring{Problema no meu if/else}{Problema no meu ifelse}}
\label{sec:problema_no_meu_ifelse}


Pessoas! Dúvida básica!

Estou com um problema num if/else.
O R roda o if/else, mas retorna esta mensagem:
\begin{verbatim}
Warning message:
In if (dados[, 3] == "C") { :
a condição tem comprimento > 1 e somente o primeiro elemento será usado
\end{verbatim}


Eu fiz algo neste estilo:
\begin{verbatim}
graf.padrao<-function(dados)
{
if(dados[,3]=="C") ### Quando a coluna 3 do data frame for "C", então...
	{
	x11()
	par(mar=c(7,5,2,1))
	par(cex.lab=3)
	par(las=2)
	par(tcl=1)
	par(cex.axis=1.5)
	plot(dados[,1]~dados[,2],pch=11,xaxp=c(min(dados[,2]),max(dados[,2]),10),yaxp=c(min(dados[,1]),max(dados[,1]),10),cex=3, col="turquoise1",ann=F)
	mtext(text=paste(colnames(dados[1])),side=2,cex=1.5,line=4,col="yellowgreen",las=0)
	mtext(text=paste(colnames(dados[2])),side=1,cex=1.5,line=5,col="hotpink",las=0)
	modelo<-lm(dados[,1]~dados[,2])
	modelo
	abline(modelo,col="blue",lty=2,lwd=3)
	}
}
\end{verbatim}


E ele retorna esse warning.
Porque ele me dá essa mensagem?
Obrigada!!

\end{document}
