Estudo de caso: Alunos do curso de biologia do Rio de Janeiro
Rodolpho Werly Mendes
2017-10-16
## Loading required package: splines## Loading required package: RcmdrMisc## Loading required package: car## Loading required package: sandwich## A interface gráfica do Rcmdr só é lançada no modo interativoIntrodução.
Este estudo de caso busca com o auxilio da plataforma R definir um perfil dos estudantes de biologia do Estado do Rio de Janeiro, procurando definir quais são os fatores para os alunos gostarem ou não de biologia.
Objetivos
Fazer o perfil do aluno do curso de biologia do Estado do Rio de Janeiro e tentar descobrir quais os fatores impactam no gostar/não gostar de biologia.
Metodologia.
Analise dos dados, identificação das variáveis explicativas e criação de gráficos e diagramas usando a plataforma R.
Discussão:
Após analise da base de dados, pode-se perceber que continha informações de alunos do Estado de São Paulo, quais nao eram relevantes na pesquisa. Depois dessa modificação foram descritas as variaveis que podem ser vistas nos gráficos abaixo.
Variávies quantitativas: Idade e gosta de estudar biologia.
Variáveis qualitativas: Raça, sexo, classe, tipo de escola e turma.
> alunosbio <- readXL("C:/Users/Steven/Downloads/CASO BIOESTATISTICA/TurmasdoBiologiaRJ.xlsx", rownames=FALSE, header=TRUE,
+ na="", sheet="science", stringsAsFactors=TRUE)> library(colorspace, pos=16)> with(alunosbio, pie(table(Raça), labels=levels(Raça), xlab="", ylab="", main="Raça",
+ col=rainbow_hcl(5)))
> with(alunosbio, pie(table(Sexo), labels=levels(Sexo), xlab="", ylab="", main="Sexo",
+ col=rainbow_hcl(3)))
> with(alunosbio, pie(table(TipodeEscola), labels=levels(TipodeEscola), xlab="", ylab="",
+ main="TipodeEscola", col=rainbow_hcl(2)))
> with(alunosbio, Barplot(Turma, xlab="Turma", ylab="Frequency"))
> summary(alunosbio) Aluno State TipodeEscola Escola
Min. : 1.0 RJ :1336 Particular:452 Min. : 1.00
1st Qu.: 380.0 SP : 49 Pública :933 1st Qu.:13.00
Median : 760.0 NA's: 883 NA's :883 Median :21.00
Mean : 766.6 Mean :21.16
3rd Qu.:1157.0 3rd Qu.:31.00
Max. :1544.0 Max. :41.00
NA's :883 NA's :883
Classe.1.manhã..2...Tarde..3.Noite.4.Integral. Sexo
Min. :1.000 f :691
1st Qu.:1.000 m :692
Median :1.000 NA : 2
Mean :1.527 NA's:883
3rd Qu.:2.000
Max. :4.000
NA's :883
Gosta.de.Estudar.Biologia Turma IDADE Raça
Min. :1.000 17.1 : 50 Min. :17.00 Amarelo : 40
1st Qu.:4.000 36.2 : 44 1st Qu.:21.00 Branco :1182
Median :5.000 21.1 : 42 Median :24.00 Indígena: 11
Mean :5.082 36.1 : 37 Mean :23.53 Outra : 7
3rd Qu.:6.000 32.1 : 34 3rd Qu.:26.00 Preto : 145
Max. :8.000 (Other):1178 Max. :27.00 NA's : 883
NA's :883 NA's : 883 NA's :883 > with(alunosbio, Hist(IDADE, scale="frequency", breaks="Sturges", col="darkgray"))
> with(alunosbio, Hist(Gosta.de.Estudar.Biologia, scale="frequency", breaks="Sturges",
+ col="darkgray"))
> with(alunosbio, Hist(Classe.1.manhã..2...Tarde..3.Noite.4.Integral., scale="frequency",
+ breaks="Sturges", col="darkgray"))
Nota-se que a maioria de alunos são de raça branca, estudam no turno da manhã, possuem entre 25 e 26 anos e estudaram em escola pública, o fator sexo foi irrelevante pois o valor aproximou-se de 50%.
Analise de Boxplot:
> Boxplot(Gosta.de.Estudar.Biologia~Raça, data=alunosbio, id.method="y")
> Boxplot(Gosta.de.Estudar.Biologia~Sexo, data=alunosbio, id.method="y")
> Boxplot(Gosta.de.Estudar.Biologia~TipodeEscola, data=alunosbio, id.method="y")
Feita a análise dos boxplots, pode-se notar que a prefência em biologia esta nos alunos de raça amarela e indigenas, do sexo masculino e que estudaram em escola pública. As variáveis idade e turno não poderam ser avaliadas pois ao fazer o boxplot elas não apareciam entre as opções permitidas.
Resultados:
Após feita toda a análise do banco de dados consegue-se traçar um perfil do aluno de biologia que é em maioria da raça branca, estudam no turno da manhã, possuem entre 25 e 26 anos e estudaram em escola pública. já os alunos que gostam de biologia são em maioria das raças amarela e indigena, do sexo masculino e estudantes de escola pública.
Considerações finais:
Para um maior interesse em biologia entre os alunos de ensino médio, escolas particulares deveriam buscar formentar projetos e atividades que deixassem os alunos mais próximos da matéria, e também incentivar a busca das mulheres pela área.