R Markdown
##################################################################################
# MEC/INEP/DAES (Diretoria de Avaliação da Educação Superior) #
# Coordenação Geral de Controle de Qualidade da Educação Superior #
#--------------------------------------------------------------------------------#
# Programa: #
# R_input_enade_2017.R (Pasta "INPUTS") #
#--------------------------------------------------------------------------------#
# Descrição: #
# Programa para Leitura dos Microdados do enade 2017 #
# ################################################################################
#Instala pacotes
vetor_pacotes=c("readr",
"ggplot2",
"plotly",
"e1071",
"dplyr",
"Hmisc",
"DescTools",
"esquisse",
"gridExtra",
"e1071",
"devtools"
)
# install.packages(vetor_pacotes)
library(DescTools)
## Warning: package 'DescTools' was built under R version 4.1.2
lapply(vetor_pacotes,
require,
character.only = TRUE)
## Loading required package: readr
## Warning: package 'readr' was built under R version 4.1.2
## Loading required package: ggplot2
## Warning: package 'ggplot2' was built under R version 4.1.2
## Loading required package: plotly
## Warning: package 'plotly' was built under R version 4.1.2
##
## Attaching package: 'plotly'
## The following object is masked from 'package:ggplot2':
##
## last_plot
## The following object is masked from 'package:stats':
##
## filter
## The following object is masked from 'package:graphics':
##
## layout
## Loading required package: e1071
## Warning: package 'e1071' was built under R version 4.1.2
## Loading required package: dplyr
## Warning: package 'dplyr' was built under R version 4.1.2
##
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
##
## filter, lag
## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, union
## Loading required package: Hmisc
## Warning: package 'Hmisc' was built under R version 4.1.2
## Loading required package: lattice
## Loading required package: survival
## Loading required package: Formula
##
## Attaching package: 'Hmisc'
## The following objects are masked from 'package:dplyr':
##
## src, summarize
## The following object is masked from 'package:e1071':
##
## impute
## The following object is masked from 'package:plotly':
##
## subplot
## The following objects are masked from 'package:DescTools':
##
## %nin%, Label, Mean, Quantile
## The following objects are masked from 'package:base':
##
## format.pval, units
## Loading required package: esquisse
## Warning: package 'esquisse' was built under R version 4.1.2
## Loading required package: gridExtra
## Warning: package 'gridExtra' was built under R version 4.1.2
##
## Attaching package: 'gridExtra'
## The following object is masked from 'package:dplyr':
##
## combine
## Loading required package: devtools
## Warning: package 'devtools' was built under R version 4.1.2
## Loading required package: usethis
## Warning: package 'usethis' was built under R version 4.1.2
## [[1]]
## [1] TRUE
##
## [[2]]
## [1] TRUE
##
## [[3]]
## [1] TRUE
##
## [[4]]
## [1] TRUE
##
## [[5]]
## [1] TRUE
##
## [[6]]
## [1] TRUE
##
## [[7]]
## [1] TRUE
##
## [[8]]
## [1] TRUE
##
## [[9]]
## [1] TRUE
##
## [[10]]
## [1] TRUE
##
## [[11]]
## [1] TRUE
# Item A - Importar arquivo notas ENADE
microdados_enade <- read.table("H:/Users/admin/Projects/ENADE/enade_2107/microdados_enade_2017.txt",header = TRUE, sep=";", dec = ",")
# Item B - Resumo Geral e Eliminação Variáveis Faltantes
summary(microdados_enade)
## NU_ANO CO_IES CO_CATEGAD CO_ORGACAD CO_GRUPO
## Min. :2017 Min. : 1 Min. :1.000 Min. :10019 Min. : 21
## 1st Qu.:2017 1st Qu.: 322 1st Qu.:2.000 1st Qu.:10022 1st Qu.:2001
## Median :2017 Median : 583 Median :4.000 Median :10028 Median :2402
## Mean :2017 Mean : 1385 Mean :3.345 Mean :10025 Mean :3193
## 3rd Qu.:2017 3rd Qu.: 1472 3rd Qu.:5.000 3rd Qu.:10028 3rd Qu.:5710
## Max. :2017 Max. :19739 Max. :7.000 Max. :10028 Max. :6409
##
## CO_CURSO CO_MODALIDADE CO_MUNIC_CURSO CO_UF_CURSO
## Min. : 3 Min. :0.0000 Min. :1100023 Min. :11.00
## 1st Qu.: 34476 1st Qu.:1.0000 1st Qu.:3106200 1st Qu.:31.00
## Median : 97507 Median :1.0000 Median :3509502 Median :35.00
## Mean : 374872 Mean :0.7867 Mean :3401669 Mean :33.84
## 3rd Qu.: 311303 3rd Qu.:1.0000 3rd Qu.:4106902 3rd Qu.:41.00
## Max. :5001385 Max. :1.0000 Max. :5300108 Max. :53.00
##
## CO_REGIAO_CURSO NU_IDADE TP_SEXO ANO_FIM_EM
## Min. :1.000 Min. :10.00 Length:537436 Min. :1957
## 1st Qu.:3.000 1st Qu.:23.00 Class :character 1st Qu.:2004
## Median :3.000 Median :26.00 Mode :character Median :2009
## Mean :3.043 Mean :29.23 Mean :2007
## 3rd Qu.:4.000 3rd Qu.:33.00 3rd Qu.:2012
## Max. :5.000 Max. :95.00 Max. :2017
## NA's :71
## ANO_IN_GRAD CO_TURNO_GRADUACAO TP_INSCRICAO_ADM TP_INSCRICAO
## Min. :1976 Min. :1.000 Min. :0.0000000 Min. :1
## 1st Qu.:2012 1st Qu.:3.000 1st Qu.:0.0000000 1st Qu.:1
## Median :2013 Median :4.000 Median :0.0000000 Median :1
## Mean :2013 Mean :3.304 Mean :0.0001321 Mean :1
## 3rd Qu.:2014 3rd Qu.:4.000 3rd Qu.:0.0000000 3rd Qu.:1
## Max. :2017 Max. :4.000 Max. :1.0000000 Max. :1
## NA's :71 NA's :465
## NU_ITEM_OFG NU_ITEM_OFG_Z NU_ITEM_OFG_X NU_ITEM_OFG_N NU_ITEM_OCE
## Min. :8 Min. :0 Min. :0.0000 Min. :0 Min. :27
## 1st Qu.:8 1st Qu.:0 1st Qu.:0.0000 1st Qu.:0 1st Qu.:27
## Median :8 Median :0 Median :0.0000 Median :0 Median :27
## Mean :8 Mean :0 Mean :0.2524 Mean :0 Mean :27
## 3rd Qu.:8 3rd Qu.:0 3rd Qu.:1.0000 3rd Qu.:0 3rd Qu.:27
## Max. :8 Max. :0 Max. :1.0000 Max. :0 Max. :27
##
## NU_ITEM_OCE_Z NU_ITEM_OCE_X NU_ITEM_OCE_N DS_VT_GAB_OFG_ORIG
## Min. :0.0000 Min. : 1.000 Min. :0 Length:537436
## 1st Qu.:0.0000 1st Qu.: 4.000 1st Qu.:0 Class :character
## Median :0.0000 Median : 4.000 Median :0 Mode :character
## Mean :0.2613 Mean : 4.541 Mean :0
## 3rd Qu.:1.0000 3rd Qu.: 5.000 3rd Qu.:0
## Max. :2.0000 Max. :11.000 Max. :0
##
## DS_VT_GAB_OFG_FIN DS_VT_GAB_OCE_ORIG DS_VT_GAB_OCE_FIN DS_VT_ESC_OFG
## Length:537436 Length:537436 Length:537436 Length:537436
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character
##
##
##
##
## DS_VT_ACE_OFG DS_VT_ESC_OCE DS_VT_ACE_OCE TP_PRES
## Min. : 0 Length:537436 Min. :9.000e+12 Min. :222.0
## 1st Qu.: 111100 Class :character 1st Qu.:1.000e+25 1st Qu.:555.0
## Median : 1101111 Mode :character Median :1.010e+26 Median :555.0
## Mean :25318887 Mean :1.485e+26 Mean :503.3
## 3rd Qu.:90000000 3rd Qu.:1.110e+26 3rd Qu.:555.0
## Max. :91111111 Max. :9.911e+26 Max. :999.0
## NA's :83971 NA's :83971 NA's :11
## TP_PR_GER TP_PR_OB_FG TP_PR_DI_FG TP_PR_OB_CE
## Min. :222.0 Min. :222.0 Min. :222.0 Min. :222.0
## 1st Qu.:555.0 1st Qu.:555.0 1st Qu.:555.0 1st Qu.:555.0
## Median :555.0 Median :555.0 Median :555.0 Median :555.0
## Mean :501.5 Mean :501.3 Mean :487.5 Mean :501.4
## 3rd Qu.:555.0 3rd Qu.:555.0 3rd Qu.:555.0 3rd Qu.:555.0
## Max. :888.0 Max. :888.0 Max. :888.0 Max. :888.0
## NA's :11 NA's :11 NA's :11 NA's :11
## TP_PR_DI_CE TP_SFG_D1 TP_SFG_D2 TP_SCE_D1
## Min. :222.0 Min. :222.0 Min. :222.0 Min. :222.0
## 1st Qu.:555.0 1st Qu.:336.0 1st Qu.:333.0 1st Qu.:333.0
## Median :555.0 Median :555.0 Median :555.0 Median :555.0
## Mean :483.9 Mean :481.4 Mean :474.4 Mean :461.8
## 3rd Qu.:555.0 3rd Qu.:555.0 3rd Qu.:555.0 3rd Qu.:555.0
## Max. :888.0 Max. :888.0 Max. :888.0 Max. :888.0
## NA's :11 NA's :11 NA's :11 NA's :11
## TP_SCE_D2 TP_SCE_D3 NT_GER NT_FG
## Min. :222.0 Min. :222.0 Min. : 0.00 Min. : 0.00
## 1st Qu.:333.0 1st Qu.:333.0 1st Qu.:33.40 1st Qu.:39.40
## Median :555.0 Median :555.0 Median :42.90 Median :52.30
## Mean :454.7 Mean :454.1 Mean :43.52 Mean :51.43
## 3rd Qu.:555.0 3rd Qu.:555.0 3rd Qu.:53.10 3rd Qu.:64.00
## Max. :888.0 Max. :888.0 Max. :98.10 Max. :99.40
## NA's :11 NA's :11 NA's :87504 NA's :87504
## NT_OBJ_FG NT_DIS_FG NT_FG_D1 NT_FG_D1_PT
## Min. : 0.00 Min. : 0.00 Min. : 0.00 Min. : 0.00
## 1st Qu.: 37.50 1st Qu.:41.00 1st Qu.: 44.00 1st Qu.: 50.00
## Median : 50.00 Median :59.50 Median : 60.00 Median : 65.00
## Mean : 49.86 Mean :53.77 Mean : 55.14 Mean : 58.12
## 3rd Qu.: 62.50 3rd Qu.:71.50 3rd Qu.: 74.00 3rd Qu.: 75.00
## Max. :100.00 Max. :99.00 Max. :100.00 Max. :100.00
## NA's :87504 NA's :87504 NA's :87504 NA's :87504
## NT_FG_D1_CT NT_FG_D2 NT_FG_D2_PT NT_FG_D2_CT
## Min. : 0.00 Min. : 0.0 Min. : 0.00 Min. : 0.00
## 1st Qu.: 40.00 1st Qu.: 31.0 1st Qu.: 45.00 1st Qu.: 25.00
## Median : 60.00 Median : 55.0 Median : 60.00 Median : 50.00
## Mean : 54.53 Mean : 52.4 Mean : 53.32 Mean : 52.32
## 3rd Qu.: 75.00 3rd Qu.: 73.0 3rd Qu.: 75.00 3rd Qu.: 75.00
## Max. :100.00 Max. :100.0 Max. :100.00 Max. :100.00
## NA's :87504 NA's :87504 NA's :87504 NA's :87504
## NT_CE NT_OBJ_CE NT_DIS_CE NT_CE_D1
## Min. : 0.00 Min. : 0.00 Min. : 0.0 Min. : 0.00
## 1st Qu.: 29.60 1st Qu.: 30.40 1st Qu.: 10.0 1st Qu.: 0.00
## Median : 40.00 Median : 42.10 Median : 26.7 Median : 20.00
## Mean : 40.87 Mean : 42.95 Mean : 29.1 Mean : 29.58
## 3rd Qu.: 51.40 3rd Qu.: 54.50 3rd Qu.: 46.7 3rd Qu.: 50.00
## Max. :100.00 Max. :100.00 Max. :100.0 Max. :100.00
## NA's :87504 NA's :87504 NA's :87504 NA's :87504
## NT_CE_D2 NT_CE_D3 CO_RS_I1 CO_RS_I2
## Min. : 0.00 Min. : 0.00 Length:537436 Length:537436
## 1st Qu.: 0.00 1st Qu.: 0.00 Class :character Class :character
## Median : 20.00 Median : 15.00 Mode :character Mode :character
## Mean : 31.18 Mean : 26.46
## 3rd Qu.: 60.00 3rd Qu.: 50.00
## Max. :100.00 Max. :100.00
## NA's :87504 NA's :87504
## CO_RS_I3 CO_RS_I4 CO_RS_I5 CO_RS_I6
## Length:537436 Length:537436 Length:537436 Length:537436
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character
##
##
##
##
## CO_RS_I7 CO_RS_I8 CO_RS_I9 QE_I01
## Length:537436 Length:537436 Length:537436 Length:537436
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character
##
##
##
##
## QE_I02 QE_I03 QE_I04 QE_I05
## Length:537436 Length:537436 Length:537436 Length:537436
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character
##
##
##
##
## QE_I06 QE_I07 QE_I08 QE_I09
## Length:537436 Length:537436 Length:537436 Length:537436
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character
##
##
##
##
## QE_I10 QE_I11 QE_I12 QE_I13
## Length:537436 Length:537436 Length:537436 Length:537436
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character
##
##
##
##
## QE_I14 QE_I15 QE_I16 QE_I17
## Length:537436 Length:537436 Min. :11.00 Length:537436
## Class :character Class :character 1st Qu.:29.00 Class :character
## Mode :character Mode :character Median :33.00 Mode :character
## Mean :33.34
## 3rd Qu.:35.00
## Max. :99.00
## NA's :69780
## QE_I18 QE_I19 QE_I20 QE_I21
## Length:537436 Length:537436 Length:537436 Length:537436
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character
##
##
##
##
## QE_I22 QE_I23 QE_I24 QE_I25
## Length:537436 Length:537436 Length:537436 Length:537436
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character
##
##
##
##
## QE_I26 QE_I27 QE_I28 QE_I29
## Length:537436 Min. :1.0 Min. :1.00 Min. :1.00
## Class :character 1st Qu.:5.0 1st Qu.:5.00 1st Qu.:5.00
## Mode :character Median :6.0 Median :6.00 Median :6.00
## Mean :5.3 Mean :5.18 Mean :5.11
## 3rd Qu.:6.0 3rd Qu.:6.00 3rd Qu.:6.00
## Max. :8.0 Max. :8.00 Max. :8.00
## NA's :69780 NA's :69780 NA's :69780
## QE_I30 QE_I31 QE_I32 QE_I33
## Min. :1.00 Min. :1.00 Min. :1.00 Min. :1.00
## 1st Qu.:4.00 1st Qu.:5.00 1st Qu.:5.00 1st Qu.:5.00
## Median :5.00 Median :6.00 Median :6.00 Median :6.00
## Mean :5.03 Mean :5.33 Mean :5.33 Mean :5.38
## 3rd Qu.:6.00 3rd Qu.:6.00 3rd Qu.:6.00 3rd Qu.:6.00
## Max. :8.00 Max. :8.00 Max. :8.00 Max. :8.00
## NA's :69780 NA's :69780 NA's :69780 NA's :69780
## QE_I34 QE_I35 QE_I36 QE_I37
## Min. :1.00 Min. :1.00 Min. :1.00 Min. :1.00
## 1st Qu.:5.00 1st Qu.:5.00 1st Qu.:5.00 1st Qu.:4.00
## Median :6.00 Median :6.00 Median :6.00 Median :5.00
## Mean :5.34 Mean :5.29 Mean :5.31 Mean :4.94
## 3rd Qu.:6.00 3rd Qu.:6.00 3rd Qu.:6.00 3rd Qu.:6.00
## Max. :8.00 Max. :8.00 Max. :8.00 Max. :8.00
## NA's :69780 NA's :69780 NA's :69780 NA's :69780
## QE_I38 QE_I39 QE_I40 QE_I41
## Min. :1.00 Min. :1.00 Min. :1.00 Min. :1.00
## 1st Qu.:4.00 1st Qu.:5.00 1st Qu.:4.00 1st Qu.:4.00
## Median :5.00 Median :6.00 Median :5.00 Median :5.00
## Mean :4.99 Mean :5.17 Mean :4.79 Mean :4.94
## 3rd Qu.:6.00 3rd Qu.:6.00 3rd Qu.:6.00 3rd Qu.:6.00
## Max. :8.00 Max. :8.00 Max. :8.00 Max. :8.00
## NA's :69780 NA's :69780 NA's :69780 NA's :69780
## QE_I42 QE_I43 QE_I44 QE_I45
## Min. :1.0 Min. :1.00 Min. :1.00 Min. :1.00
## 1st Qu.:5.0 1st Qu.:4.00 1st Qu.:4.00 1st Qu.:4.00
## Median :6.0 Median :6.00 Median :5.00 Median :5.00
## Mean :5.4 Mean :4.99 Mean :4.97 Mean :4.98
## 3rd Qu.:6.0 3rd Qu.:6.00 3rd Qu.:6.00 3rd Qu.:6.00
## Max. :8.0 Max. :8.00 Max. :8.00 Max. :8.00
## NA's :69780 NA's :69780 NA's :69780 NA's :69780
## QE_I46 QE_I47 QE_I48 QE_I49
## Min. :1 Min. :1.00 Min. :1.00 Min. :1.00
## 1st Qu.:4 1st Qu.:4.00 1st Qu.:4.00 1st Qu.:5.00
## Median :5 Median :5.00 Median :5.00 Median :5.00
## Mean :5 Mean :4.95 Mean :4.72 Mean :5.13
## 3rd Qu.:6 3rd Qu.:6.00 3rd Qu.:6.00 3rd Qu.:6.00
## Max. :8 Max. :8.00 Max. :8.00 Max. :8.00
## NA's :69780 NA's :69780 NA's :69780 NA's :69780
## QE_I50 QE_I51 QE_I52 QE_I53
## Min. :1.00 Min. :1.00 Min. :1.00 Min. :1.00
## 1st Qu.:5.00 1st Qu.:5.00 1st Qu.:3.00 1st Qu.:3.00
## Median :6.00 Median :6.00 Median :5.00 Median :5.00
## Mean :5.53 Mean :5.59 Mean :4.79 Mean :4.77
## 3rd Qu.:6.00 3rd Qu.:6.00 3rd Qu.:6.00 3rd Qu.:7.00
## Max. :8.00 Max. :8.00 Max. :8.00 Max. :8.00
## NA's :69780 NA's :69780 NA's :69780 NA's :69780
## QE_I54 QE_I55 QE_I56 QE_I57
## Min. :1.00 Min. :1.00 Min. :1.00 Min. :1.00
## 1st Qu.:5.00 1st Qu.:5.00 1st Qu.:4.00 1st Qu.:5.00
## Median :6.00 Median :6.00 Median :5.00 Median :6.00
## Mean :5.14 Mean :5.17 Mean :4.98 Mean :5.24
## 3rd Qu.:6.00 3rd Qu.:6.00 3rd Qu.:6.00 3rd Qu.:6.00
## Max. :8.00 Max. :8.00 Max. :8.00 Max. :8.00
## NA's :69780 NA's :69780 NA's :69780 NA's :69780
## QE_I58 QE_I59 QE_I60 QE_I61
## Min. :1.00 Min. :1 Min. :1.00 Min. :1.00
## 1st Qu.:5.00 1st Qu.:4 1st Qu.:4.00 1st Qu.:4.00
## Median :6.00 Median :5 Median :5.00 Median :5.00
## Mean :5.29 Mean :5 Mean :4.95 Mean :4.91
## 3rd Qu.:6.00 3rd Qu.:6 3rd Qu.:6.00 3rd Qu.:6.00
## Max. :8.00 Max. :8 Max. :8.00 Max. :8.00
## NA's :69780 NA's :69780 NA's :69780 NA's :69780
## QE_I62 QE_I63 QE_I64 QE_I65
## Min. :1.00 Min. :1.00 Min. :1.00 Min. :1.00
## 1st Qu.:4.00 1st Qu.:4.00 1st Qu.:5.00 1st Qu.:4.00
## Median :5.00 Median :5.00 Median :6.00 Median :6.00
## Mean :4.94 Mean :5.01 Mean :5.14 Mean :5.16
## 3rd Qu.:6.00 3rd Qu.:6.00 3rd Qu.:6.00 3rd Qu.:6.00
## Max. :8.00 Max. :8.00 Max. :8.00 Max. :8.00
## NA's :69780 NA's :69780 NA's :69780 NA's :69780
## QE_I66 QE_I67 QE_I68 QE_I69
## Min. :1.00 Min. :1.00 Min. :1.00 Length:537436
## 1st Qu.:5.00 1st Qu.:4.00 1st Qu.:4.00 Class :character
## Median :6.00 Median :5.00 Median :6.00 Mode :character
## Mean :5.28 Mean :4.97 Mean :4.98
## 3rd Qu.:6.00 3rd Qu.:6.00 3rd Qu.:6.00
## Max. :8.00 Max. :8.00 Max. :8.00
## NA's :69780 NA's :69780 NA's :69780
## QE_I70 QE_I71 QE_I72 QE_I73
## Length:537436 Length:537436 Length:537436 Length:537436
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character
##
##
##
##
## QE_I74 QE_I75 QE_I76 QE_I77
## Length:537436 Length:537436 Length:537436 Length:537436
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character
##
##
##
##
## QE_I78 QE_I79 QE_I80 QE_I81
## Length:537436 Length:537436 Length:537436 Length:537436
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character
##
##
##
##
microdados_sem_NA <- na.omit(microdados_enade)
# Item C - Média Geral
media_tot <- mean(as.numeric(microdados_sem_NA$NT_GER))
# Item D - Selecionando o curso de Matemática (Licenciatura) e Calcular Media Nota Geral
microdados_mat <- microdados_sem_NA %>% filter(CO_GRUPO==702)
sample.mean <- mean(as.numeric(microdados_mat$NT_GER))
print(sample.mean)
## [1] 38.64132
# Item E - Calcule o desvio padrão
sample.n <- length(microdados_mat$NT_GER)
sample.sd <- sd(microdados_mat$NT_GER)
sample.se <- sample.sd/sqrt(sample.n)
print(sample.n)
## [1] 10679
print(sample.sd)
## [1] 13.31965
print(sample.se)
## [1] 0.1288925
#Item F - Calular o Intervalo de Confiança
alpha = 0.05
degrees.freedom = sample.n - 1
t.score = qt(p=alpha/2, df=degrees.freedom,lower.tail=F)
print(t.score)
## [1] 1.960186
margin.error <- t.score * sample.se
lower.bound <- sample.mean - margin.error
upper.bound <- sample.mean + margin.error
print(c(lower.bound,upper.bound))
## [1] 38.38867 38.89398
#Item G - Distribuição
# Considerando que o tamanho da amostra (n>30)
# e que as notas distribuem-se abaixo acima da média,
# devemos utilizar a distribuição NORMAL uma vez que 2/3 dos dados estarão no
# intervalo xbarra-s e xbarra+s
#Item H - A nota dos alunos foi típica ou atípica?
# A nota foi típica uma vez que a maioria das notas encontra-se dentro do IC
#Item I - Teste de hipótese bilateral ao nível de confiança de 95%
# Calculate the t-statistic for the test
t.test(microdados_mat$NT_GER, mu=media_tot)
##
## One Sample t-test
##
## data: microdados_mat$NT_GER
## t = -38.613, df = 10678, p-value < 2.2e-16
## alternative hypothesis: true mean is not equal to 43.61828
## 95 percent confidence interval:
## 38.38867 38.89398
## sample estimates:
## mean of x
## 38.64132
#É possível afirmar que a média das notas dos curso selecionado é SIM significativamente menor que a média de TODAS as notas dos resultados.