Este é o relatório do questionário sóciodemográfico.
O banco usado para descrever a amostra é o da Jéssica. Para avaliação do curso, é o da Érika.
# Ler bancos de dados
## Jéssica
socioDemo <- read.csv("../caracterizacao/sociodemografico.csv", na.strings="-")
## Érika
ativCol <- read.csv("../caracterizacao/atividadesColaborativas-respostas.csv", dec = ",", na.strings="-")
# Selecionar somente aqueles que consentiram participar na pesquisa
## Jéssica
socioDemo <- subset(socioDemo, socioDemo$termo == "Sim")
## Érika
ativCol <- subset(ativCol, ativCol$termo == "Sim")
Abaixo, criei uma função para deixar os resultados visualmente melhores.
# Função porcentagem
porcentagem <- function(var){
a <- round(prop.table(table(var)),3)*100
print(cbind(sort(a, decreasing = TRUE)))
}
# Idade
## Recodificar variável para numérica
socioDemo$age <- as.numeric(as.character(socioDemo$idade))
## Warning: NAs introduzidos por coerção
## Excluir usuários que inseriram o ano de nascimento
socioDemo$age <- ifelse(socioDemo$age > 70, NA, socioDemo$age)
## Média de idade
mean(socioDemo$age, na.rm = TRUE)
## [1] 40.7
## Desvio Padrão
sd(socioDemo$age, na.rm = TRUE)
## [1] 8.955
## Sexo
porcentagem(socioDemo$sexo)
## [,1]
## Feminino 85.8
## Masculino 14.2
## Escolaridade
porcentagem(socioDemo$escolaridade)
## [,1]
## Pós-graduação 64.8
## Ensino Superior Completo 28.9
## Ensino Superior Incompleto 4.9
## Ensino Médio Completo 1.3
## Ensino Fundamental Completo 0.0
## Ensino Fundamental Incompleto 0.0
## Ensino Médio Incompleto 0.0
## Ocupaçao
porcentagem(socioDemo$ocupacao)
## [,1]
## Professor (a) 70.9
## Outros 12.1
## Diretor (a) 5.2
## Coordenador (a) Pedagógico 4.4
## Supervisor (a) 4.0
## Orientador (a) 2.5
## Estudante 1.0
## Contato Anterior
porcentagem(socioDemo$contatoanterior)
## [,1]
## Sim 62.8
## Não 37.2
## Onde lida
porcentagem(socioDemo$lida.onde)
## [,1]
## Escola 35.2
## Família 22.8
## Comunidade 18.6
## Outros 12.4
## Amigos 5.5
## Serviços de atuação 3.7
## Serviços de saúde 1.8
## Motivo Curso
porcentagem(socioDemo$motivocurso)
## [,1]
## Para aquisição de conhecimento na área 46.4
## Por ser uma oportunidade de formação continuada 29.1
## Identificação profissional com o tema 17.2
## Identificação pessoal com o tema 3.1
## Outros 2.7
## Pelo fato de o curso estar vinculado à Universidade 0.7
## Por ser um curso à distância 0.4
## Pelo fato de o curso ser gratuito 0.2
### Material Didático
porcentagem(ativCol$material)
## [,1]
## Muito adequado 63.0
## Adequado 36.3
## Pouco adequado 0.5
## Nada adequado 0.2
### Prazo Atividades
porcentagem(ativCol$flexprazo)
## [,1]
## Flexível 65.3
## Muito flexível 17.4
## Pouco flexível 16.5
## Nada flexível 0.8
### Interação entre pares
porcentagem(ativCol$interacaocol)
## [,1]
## Muito importante 50.3
## Importante 45.1
## Pouco importante 4.3
## Nada importante 0.4
### Organização curso
porcentagem(ativCol$organizado)
## [,1]
## Organizado 50.6
## Muito organizado 47.5
## Desorganizado 1.8
## Muito desorganizado 0.1
### O quão importante é o auxílio de seu tutor
porcentagem(ativCol$freqauxitutor)
## [,1]
## Sempre 75.1
## Às vezes 22.3
## Raramente 2.4
## Nunca 0.3
### Participação em outro curso
porcentagem(ativCol$partoutrocurso)
## [,1]
## Sim 62.2
## Não 37.8