Estava tentando abrir os dados numéricos em tabelas, contudo, quando aciono o glimpse os dados das colunas aparecem com NA ou 2\t.
O meu script começa a dar errado a partir de “banco de pessoas”. Como resolvo isso?
# Bando de dados
load("C:/Users/usuario/OneDrive/Documentos/UFRN/Mestrado/Dados/dicPNAD2015.Rdata")
#1) Instalar e carregar pacotes ----
install.packages(c("readxl", "dplyr", "foreign"))
library(readr)
library(readxl)
library(dplyr)
library(foreign)
install.packages("parallel")
library(parallel)
install.packages("dplyr")
library(dplyr)
install.packages("tidyverse")
library(tidyverse)
getwd()
setwd("C:/Users/usuario/OneDrive/Documentos/UFRN/Mestrado/Dados")
#Essa é a pasta onde os dados estão, tanto domicilio, quanto pessoas
#tem que carregar a área de trabalho através de dicPNAD2015
#banco de domicilios
view(dicdom2015)
inteira2<- read_fwf(file = "DOM2015.txt", fwf_widths(dicdom2015$tamanho[c(1,3:nrow(dicdom2015))],col_names = as.character(dicdom2015$cod)[c(1,3:nrow(dicdom2015))]))
summary(inteira2)
inteira2$uf<- substr(inteira2$V0102,1,2)
#banco de pessoas
view(dicpes2015)
inteira_pessoas<- read_fwf(file = "PES2015.txt", fwf_widths(dicpes2015$tamanho[c(1,3:nrow(dicpes2015))],col_names = as.character(dicpes2015$cod)[c(1,3:nrow(dicpes2015))]))
summary(inteira_pessoas)
inteira_pessoas$uf<- substr(inteira_pessoas$V0102,1,2)
regiao<- (inteira_pessoas$uf)
glimpse(inteira_pessoas$uf)
#Script da internet
head(inteira_pessoas)
colnames(inteira_pessoas)
regiao_sexo<-select(inteira_pessoas,5, 10,13,20, 435)
head(regiao_sexo)
view(regiao_sexo)
regiao<- c(inteira_pessoas$uf,)
view(regiao)
#Tabelas de variáveis
tab1<-table(inteira_pessoas$uf)
view(tab1)
tab2<-table(inteira_pessoas$V0302==4)
view(tab2)
tab3<-table(inteira_pessoas$V0401)
view(tab3)
tab4<-table(inteira_pessoas$V0404)
view(tab4)
tab5<-table(inteira_pessoas$V4011)
view(tab5)
#Combinando as variáveis
tab<-table(inteira_pessoas$uf==21,inteira_pessoas$V0302==4,inteira_pessoas$V0401==6)
view(tab)
library(clipr)
write_clip(tab1)