Re: [R-br] Criar uma coluna de lancamentos de pesca
Mauro, bom dia! O trecho que você executa é pra fazer isso mesmo. Faltou executar o trecho final do script. ================================================ Éder Comunello Agronomist (UEM), MSc in Environ. Sciences (UEM) DSc in Agricultural Systems Engineering (USP/Esalq) Brazilian Agricultural Research Corporation (Embrapa) Dourados, MS, Brazil |<O>| ================================================ GEO, -22.2752, -54.8182, 408m UTC-04:00 / DST: UTC-03:00 Em 11 de maio de 2016 22:06, sznelwar@uol.com.br <sznelwar@uol.com.br> escreveu:
Por que não estou conseguindo rodar isto? Vejam como fica quando eu tento rodar!
df <- read.table(text= + "diamesanoboat + 912005AGIOS.NIKOLAUS + 1012005AGIOS.NIKOLAUS + 1112005AGIOS.NIKOLAUS + 1212005AGIOS.NIKOLAUS + 1312005AGIOS.NIKOLAUS + 912005X + 1012005X + 1112005X + 1212005Y + 1312005Y", head=T, as.is=T)
df$lance <- NA df
diamesanoboat lance 1 912005AGIOS.NIKOLAUS NA 2 1012005AGIOS.NIKOLAUS NA 3 1112005AGIOS.NIKOLAUS NA 4 1212005AGIOS.NIKOLAUS NA 5 1312005AGIOS.NIKOLAUS NA 6 912005X NA 7 1012005X NA 8 1112005X NA 9 1212005Y NA 10 1312005Y NA
------------------------------
*De: *"Éder Comunello" <comunello.eder@gmail.com> *Enviada: *2016/05/11 15:22:47
*Para: *r-br@listas.c3sl.ufpr.br *Assunto: * Re: [R-br] Criar uma coluna de lancamentos de pesca
Humberto, bom dia!
Segue uma uma sugestão, sem considerar que possa haver duplicidade...
### <code r> df <- read.table(text= "dia mes ano boat 9 1 2005 AGIOS.NIKOLAUS 10 1 2005 AGIOS.NIKOLAUS 11 1 2005 AGIOS.NIKOLAUS 12 1 2005 AGIOS.NIKOLAUS 13 1 2005 AGIOS.NIKOLAUS 9 1 2005 X 10 1 2005 X 11 1 2005 X 12 1 2005 Y 13 1 2005 Y", head=T, as.is=T)
df$lance <- NA df
for (boat in unique(df$boat)) { sel <- which(df$boat==boat) df[sel, "lance"] <- 1:length(sel) }
df # dia mes ano boat lance # 1 9 1 2005 AGIOS.NIKOLAUS 1 # 2 10 1 2005 AGIOS.NIKOLAUS 2 # 3 11 1 2005 AGIOS.NIKOLAUS 3 # 4 12 1 2005 AGIOS.NIKOLAUS 4 # 5 13 1 2005 AGIOS.NIKOLAUS 5 # 6 9 1 2005 X 1 # 7 10 1 2005 X 2 # 8 11 1 2005 X 3 # 9 12 1 2005 Y 1 # 10 13 1 2005 Y 2 ### </code>
================================================ Éder Comunello Agronomist (UEM), MSc in Environ. Sciences (UEM) DSc in Agricultural Systems Engineering (USP/Esalq) Brazilian Agricultural Research Corporation (Embrapa) Dourados, MS, Brazil |<O>| ================================================ GEO, -22.2752, -54.8182, 408m UTC-04:00 / DST: UTC-03:00
Em 11 de maio de 2016 09:37, Humberto Hazin <hhazin@gmail.com <http:///compose?to=hhazin@gmail.com>> escreveu:
Olá pessoal,
Estou precisando criar uma coluna chamada lances. Onde cada lance corresponde a um dia, mês, ano e barco conforme o exemplo abaixo:
dia
mes
ano
boat
9
1
2005
AGIOS.NIKOLAUS
10
1
2005
AGIOS.NIKOLAUS
11
1
2005
AGIOS.NIKOLAUS
12
1
2005
AGIOS.NIKOLAUS
13
1
2005
AGIOS.NIKOLAUS
Eu gostaria que a tabela ficasse dessa forma aqui
dia
mes
ano
boat
Lance
9
1
2005
AGIOS.NIKOLAUS
1
10
1
2005
AGIOS.NIKOLAUS
2
11
1
2005
AGIOS.NIKOLAUS
3
12
1
2005
AGIOS.NIKOLAUS
4
13
1
2005
AGIOS.NIKOLAUS
5
Agradeço desde já
Humberto
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br <http:///compose?to=R-br@listas.c3sl.ufpr.br> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forne�a c�digo m�nimo reproduz�vel.
participantes (2)
-
sznelwar＠uol.com.br -
Éder Comunello