
Usando o código reproduzível do Cid, é possível fazer utilizando a função adply do pacote {plyr} a <- "Nova_Nazare_(MT)" b <- "Ilhéus_(BA)" c <- data.frame(cidades=c(a,b)) #install.packages("plyr") library(plyr) adply(c,1,function(x) data.frame(cidade=tolower(substr(x,1,nchar(x)-5)),estado=substr(x,nchar(x)-2,nchar(x)-1))) att On Nov 18 2020, at 11:10 am, Bia Rebelatto por (R-br) <r-br@listas.c3sl.ufpr.br> wrote:
Olá pessoal,
Eu gostaria de retirar a UF que vem junto com os municípios dos dados do IBGE, coloca-la em uma nova coluna para os estados, e deixar todos os caracteres em minúsculo. Exemplo:
De Nova_Nazare_(MT) para nova_nazare
Este é o script que estou utilizando:
#Calling the package group ---- library(tidyverse)
#Load data ---- setwd('...') alldata = list.files()
#Change especial character ---- chg = function(x){ iconv(x, to = "ASCII//TRANSLIT") }
#Put NA info ---- ##We will replace all in this loop ##In the and, we will exporting all for (i in alldata) { df = read.csv(i, sep = ";")
df[df == "-"] <- c(NA) df[df == "..."] <- c(NA)
df$municipalities = chg(df$municipalities) df$municipalities = gsub("'", "", df$municipalities) df$municipalities = gsub(" ", "_", df$municipalities)
Desde já agradeço!
Bianca _______________________________________________ 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.