<html xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40"><head><meta http-equiv=Content-Type content="text/html; charset=utf-8"><meta name=Generator content="Microsoft Word 15 (filtered medium)"><style><!--
/* Font Definitions */
@font-face
{font-family:"Cambria Math";
panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
{font-family:Calibri;
panose-1:2 15 5 2 2 2 4 3 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0in;
font-size:11.0pt;
font-family:"Calibri",sans-serif;}
a:link, span.MsoHyperlink
{mso-style-priority:99;
color:blue;
text-decoration:underline;}
.MsoChpDefault
{mso-style-type:export-only;}
@page WordSection1
{size:8.5in 11.0in;
margin:70.85pt 85.05pt 70.85pt 85.05pt;}
div.WordSection1
{page:WordSection1;}
--></style></head><body lang=EN-US link=blue vlink="#954F72"><div class=WordSection1><p class=MsoNormal><span lang=PT-BR>Jobenil, obrigado <o:p></o:p></span></p><p class=MsoNormal><span lang=PT-BR>Vou tentar aqui</span></p><p class=MsoNormal><o:p> </o:p></p><p class=MsoNormal>Cid Edson Mendonça Póvoas<br>Cel: +55 (73) 99151-9565<br>Engenheiro Agrônomo<br>Técnico em Segurança do Trabalho <br>LinkedIn: http://br.linkedin.com/in/cidedson/<br>Lattes: http://lattes.cnpq.br/2303498368142537</p><p class=MsoNormal><o:p> </o:p></p><div style='mso-element:para-border-div;border:none;border-top:solid #E1E1E1 1.0pt;padding:3.0pt 0in 0in 0in'><p class=MsoNormal style='border:none;padding:0in'><b>De: </b><a href="mailto:r-br@listas.c3sl.ufpr.br">Jobenil - Gmail por (R-br)</a><br><b>Enviado:</b>Friday, July 31, 2020 2:42 PM<br><b>Para: </b><a href="mailto:r-br@listas.c3sl.ufpr.br">a lista Brasileira oficial de discussão do programa R.</a><br><b>Cc:</b><a href="mailto:pjobenil@gmail.com">Jobenil - Gmail</a><br><b>Assunto: </b>[R-br] RES: Manipulação de dados</p></div><p class=MsoNormal><o:p> </o:p></p><p class=MsoNormal><span lang=PT-BR>Cid<o:p></o:p></span></p><p class=MsoNormal><span lang=PT-BR><o:p> </o:p></span></p><p class=MsoNormal><span lang=PT-BR>Talvez você possa aplicar algo assim a cada coluna: factor(ifelse(diff(df$b) < abs(5), "normal", "anormal"))<o:p></o:p></span></p><p class=MsoNormal><span lang=PT-BR>Você obterá uma linha a menos. Se precisar aplicar por categoria baseado na coluna “a” acho que pode usar by.<o:p></o:p></span></p><p class=MsoNormal><span lang=PT-BR>Bom trabalho.<o:p></o:p></span></p><p class=MsoNormal><span lang=PT-BR>At.<o:p></o:p></span></p><p class=MsoNormal><span lang=PT-BR>Jobenil Júnior<o:p></o:p></span></p><p class=MsoNormal><span lang=PT-BR><o:p> </o:p></span></p><p class=MsoNormal><span lang=PT-BR><o:p> </o:p></span></p><p class=MsoNormal><span lang=PT-BR>Enviado do <a href="https://go.microsoft.com/fwlink/?LinkId=550986">Email</a> para Windows 10<o:p></o:p></span></p><p class=MsoNormal><span lang=PT-BR><o:p> </o:p></span></p><div style='border:none;border-top:solid #E1E1E1 1.0pt;padding:3.0pt 0in 0in 0in'><p class=MsoNormal><b><span lang=PT-BR>De: </span></b><span lang=PT-BR><a href="mailto:r-br@listas.c3sl.ufpr.br">Cid Póvoas por (R-br)</a><br><b>Enviado:</b>sexta-feira, 31 de julho de 2020 13:13<br><b>Para: </b><a href="mailto:r-br@listas.c3sl.ufpr.br">r-br@listas.c3sl.ufpr.br</a><br><b>Cc:</b><a href="mailto:cidedson@gmail.com">Cid Póvoas</a><br><b>Assunto: </b>[R-br] Manipulação de dados<o:p></o:p></span></p></div><p class=MsoNormal><span lang=PT-BR><o:p> </o:p></span></p><div><p class=MsoNormal><span lang=PT-BR>Boa tarde,<o:p></o:p></span></p><div><p class=MsoNormal><span lang=PT-BR><o:p> </o:p></span></p></div><div><p class=MsoNormal><span lang=PT-BR>Eu tenho um banco de dados com 19 colunas sendo uma de data e 18 colunas com 67308 linhas e gostaria de saber se alguém sabe como editar esse dataframe quando valor de uma linha pra outra variar mais q X, repetir o valor da última linha, e continuar assim para todas as colunas. Na minha situação variar mais que 5 de uma linha pra outra seria uma anomalia do sensor.<o:p></o:p></span></p></div><div><p class=MsoNormal><span lang=PT-BR><o:p> </o:p></span></p></div><div><p class=MsoNormal><span lang=PT-BR>Banco de dados para exemplo<o:p></o:p></span></p></div><div><p class=MsoNormal><span lang=PT-BR><o:p> </o:p></span></p></div><div><div><div><div><div><div><div><div><div><div><div><div><div><p class=MsoNormal style='mso-margin-top-alt:auto;margin-bottom:12.0pt'><span lang=PT-BR>df <- structure(list(a = c("A", "A","B","B","C","C","A", "A","B","B","C","C"),<br> b = c(1,2,1,4,3,10,2,3,1,7,9,-10),<br> c = c(5,1,2,3,3,1,2,3,9,7,-5,10),<br> d = c(3,10,1,9,2,1,2,3,3,5,-5,9)), <br> .Names = c("nome","b","c","d"),<br> class = "data.frame",row.names = c(NA, -12L))<o:p></o:p></span></p><p class=MsoNormal style='mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span lang=PT-BR><o:p> </o:p></span></p></div></div></div></div></div></div></div></div></div></div></div></div></div></div><p class=MsoNormal style='mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span lang=PT-BR><o:p> </o:p></span></p><p class=MsoNormal><span lang=PT-BR><o:p> </o:p></span></p><p class=MsoNormal><o:p> </o:p></p></div></body></html>