<\/p>\n
A fun\u00e7\u00e3o ifelse()<\/strong> na base R converte objetos de data em objetos num\u00e9ricos por padr\u00e3o.<\/span><\/p>\n Para evitar que isso aconte\u00e7a, voc\u00ea pode usar um dos seguintes m\u00e9todos como alternativa:<\/span><\/p>\n M\u00e9todo 1: Use as.character() na Base R<\/strong><\/span><\/p>\n M\u00e9todo 2: use if_else() em dplyr<\/strong><\/span><\/p>\n M\u00e9todo 3: use fifelse() em data.table<\/strong><\/span><\/p>\n Os exemplos a seguir mostram como usar cada m\u00e9todo na pr\u00e1tica com o seguinte quadro de dados em R:<\/span><\/p>\n O c\u00f3digo a seguir mostra como usar a fun\u00e7\u00e3o as.character()<\/strong> com a fun\u00e7\u00e3o R base ifelse()<\/strong> para executar uma instru\u00e7\u00e3o if else na coluna de data<\/strong> do quadro de dados e produzir uma data como resultado:<\/span><\/p>\n Se um valor na coluna de data<\/strong> for anterior a 20\/01\/2022, adicionamos cinco dias \u00e0 data.<\/span><\/span><\/p>\n Observe que a coluna de data<\/strong> manteve seu formato de data em vez de ser convertida para um formato num\u00e9rico.<\/span><\/p>\n O c\u00f3digo a seguir mostra como usar a fun\u00e7\u00e3o if_else()<\/strong> do dplyr para executar uma instru\u00e7\u00e3o if else na coluna de data<\/strong> do quadro de dados e produzir uma data como resultado:<\/span><\/p>\n Se um valor na coluna de data<\/strong> for anterior a 20\/01\/2022, adicionamos cinco dias \u00e0 data.<\/span><\/p>\n Observe que a coluna de data<\/strong> manteve seu formato de data em vez de ser convertida para um formato num\u00e9rico.<\/span><\/p>\n O c\u00f3digo a seguir mostra como usar a fun\u00e7\u00e3o fifelse()<\/strong> de data.table para executar uma instru\u00e7\u00e3o if else na coluna de data<\/strong> no quadro de dados e produzir uma data como resultado:<\/span><\/p>\n Se um valor na coluna de data<\/strong> for anterior a 20\/01\/2022, adicionamos cinco dias \u00e0 data.<\/span><\/p>\n Novamente, a coluna de data<\/strong> manteve seu formato de data em vez de ser convertida para um formato num\u00e9rico.<\/span><\/p>\n Nota<\/strong> : Para quadros de dados extremamente grandes, os m\u00e9todos dplyr e data.table ser\u00e3o mais r\u00e1pidos que o m\u00e9todo R base.<\/span><\/p>\n Os tutoriais a seguir explicam como realizar outras tarefas comuns em R:<\/span><\/p>\n Como escrever uma instru\u00e7\u00e3o If Else aninhada em R<\/a> A fun\u00e7\u00e3o ifelse() na base R converte objetos de data em objetos num\u00e9ricos por padr\u00e3o. Para evitar que isso aconte\u00e7a, voc\u00ea pode usar um dos seguintes m\u00e9todos como alternativa: M\u00e9todo 1: Use as.character() na Base R df$date <- as. Date (ifelse(df$date < ‘ 2022-01-20 ‘, as. character (df$date+5), as. character (df$date))) M\u00e9todo 2: use if_else() […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[11],"tags":[],"class_list":["post-3899","post","type-post","status-publish","format-standard","hentry","category-guia"],"yoast_head":"\n df$date <- as. Date<\/span> (ifelse(df$date < ' 2022-01-20<\/span> ',\n as. character<\/span> (df$date+5),\n as. character<\/span> (df$date)))<\/strong><\/pre>\n df$date <- if_else(df$date < ' 2022-01-20<\/span> ', df$date+5, df$date)<\/strong><\/pre>\n df$date <- fifelse(df$date < ' 2022-01-20<\/span> ', df$date+5, df$date)<\/strong><\/pre>\n #create data frame<\/span>\ndf <- data. frame<\/span> (date=as. Date<\/span> (c('2022-01-05', '2022-01-17', '2022-01-22',\n '2022-01-23', '2022-01-29', '2022-02-13')),\n sales=c(22, 35, 24, 20, 16, 19))\n\n#view data frame\n<\/span>df\n\n dirty date\n1 2022-01-05 22\n2 2022-01-17 35\n3 2022-01-22 24\n4 2022-01-23 20\n5 2022-01-29 16\n6 2022-02-13 19\n<\/strong><\/pre>\n Exemplo 1: Use as.character() na Base R<\/strong><\/span><\/h2>\n
#if date is before 2022-01-20 then add 5 days<\/span>\ndf$date <- as. Date<\/span> (ifelse(df$date < ' 2022-01-20<\/span> ',\n as. character<\/span> (df$date+5),\n as. character<\/span> (df$date)))\n\n#view updated data frame<\/span>\ndf\n\n dirty dates\n1 2022-01-10 22\n2 2022-01-22 35\n3 2022-01-22 24\n4 2022-01-23 20\n5 2022-01-29 16\n6 2022-02-13 19\n<\/strong><\/pre>\n Exemplo 2: Use if_else() em dplyr<\/strong><\/span><\/h2>\n
library<\/span> (dplyr)<\/span>\n\n#if date is before 2022-01-20 then add 5 days<\/span>\ndf$date <- if_else(df$date < ' 2022-01-20<\/span> ', df$date+5, df$date)\n\n#view updated data frame<\/span>\ndf\n\n dirty date\n1 2022-01-10 22\n2 2022-01-22 35\n3 2022-01-22 24\n4 2022-01-23 20\n5 2022-01-29 16\n6 2022-02-13 19\n<\/strong><\/pre>\n Exemplo 3: Use fifelse() em data.table<\/strong><\/span><\/h2>\n
library<\/span> (data.table)<\/span>\n\n#if date is before 2022-01-20 then add 5 days<\/span>\ndf$date <- fifelse(df$date < ' 2022-01-20<\/span> ', df$date+5, df$date)\n\n#view updated data frame<\/span>\ndf\n\n dirty dates\n1 2022-01-10 22\n2 2022-01-22 35\n3 2022-01-22 24\n4 2022-01-23 20\n5 2022-01-29 16\n6 2022-02-13 19\n<\/strong><\/pre>\n Recursos adicionais<\/strong><\/span><\/h2>\n
Como escrever uma declara\u00e7\u00e3o de caso em R<\/a>
Como adicionar v\u00e1rias colunas ao quadro de dados em R<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"