<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=utf-8">
<META content="MSHTML 6.00.2900.3429" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY>
<DIV><FONT face=Arial size=2><FONT color=#0000ff size=3>Eu havia rodado tudo, eu 
apenas coloquei as linhas finais para perguntar o motivo. Veja 
agora:</FONT><BR>>       
require(doBy)<BR>Carregando pacotes exigidos: doBy<BR>Carregando pacotes 
exigidos: survival<BR>Carregando pacotes exigidos: splines<BR>Carregando pacotes 
exigidos: R2HTML<BR>Carregando pacotes exigidos: multcomp<BR>Carregando pacotes 
exigidos: mvtnorm<BR>Carregando pacotes exigidos: lme4<BR>Failed with 
error:  ‘package ‘lme4’ could not be loaded’<BR>Além disso: Mensagens de 
aviso perdidas:<BR>In library(pkg, character.only = TRUE, logical.return = TRUE, 
lib.loc = lib.loc) :<BR>  there is no package called ‘lme4’<BR>> 
<BR>>       dados <- 
read.table("dadosvrf_met_2011090100.txt")<BR>>       
names(dados) <- c("data", "mrun", "frange", "mtype", "cod", "ylat", "xlon", 
"V10", "dirVT", "hOD",<BR>+       "hMR", "hVG", 
"dirMO", "dirPO", "dirMM", "dirPM", "perMO", "perPO", "perPM")<BR>> 
<BR>>       unique(dados$cod)<BR>[1] 69151 
69150 69152 SBLB  SBMM  SBEC  PRAT <BR>Levels: 69150 69151 69152 
PRAT SBEC SBLB SBMM<BR>>       #[1] "69151" 
"69150" "69152" "SBLB" "SBMM" "SBEC" "PRAT"<BR>> 
<BR>>       table(dados$cod)</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial size=2>69150 69151 69152  PRAT  SBEC  
SBLB  SBMM <BR>   78    78    
78    78    78    
78    78 <BR>>       #69150 
69151 69152 PRAT SBEC SBLB SBMM<BR>>       # 78 
78 78 78 78 78 78<BR>> <BR>> <BR>>       
## selecionando somente variaveis de 
interesse<BR>>       oldVals <- 
as.list(unique(dados$cod)[4:7])<BR>>       ## 
vetor com novos valores para as variaveis de 
interesse<BR>>       newVals <- 
as.list(unique(c(11114, 11115, 11117, 11118)))<BR>> 
<BR>>       dados$new_cod<- recodeVar(x = 
dados$cod, oldVals, newVals)<BR>Erro: não foi possível encontrar a função 
"recodeVar"<BR>> <BR>>       
table(dados$new_cod)<BR>character(0)<BR>>       
#11114 11115 11117 11118 69150 69151 
69152<BR>>       # 78 78 78 78 78 78 78<BR>> 
<BR></FONT></DIV>
<DIV><FONT face=Arial><BR><FONT size=2></FONT></FONT></DIV><FONT face=Arial 
size=2>Mauro<BR><BR>voce preciusa prestar mais atenção nesta coisa de rodar os 
codigos<BR>que enviam<BR><BR>Esta mensagem (nao encontrou a função)<BR>é típica 
de algum pacote não carregado.<BR><BR>Voce nao rodou o<BR>require(doBy)<BR>que 
está na mensagem<BR><BR>Procure prestar mais atenção e refletir um pouco sobre 
as mensagens antes <BR>de postar aqui<BR><BR><BR></FONT></BODY></HTML>