Ajustes

Processamento/UC2.R

@@ -96,6 +96,3 @@ write.csv(correlacoes, "correlacoes.csv", quote=F, row.names=F, col.names=F)
 write.csv(prova.exercicio.um[, c("nota", "numero.submissoes")], "UC2-Prova1.csv", quote=F, row.names=F, col.names=F)
 write.csv(prova.exercicio.dois[, c("nota", "numero.submissoes")], "UC2-Prova2.csv", quote=F, row.names=F, col.names=F)
 write.csv(prova.exercicio.tres[, c("nota", "numero.submissoes")], "UC2-Prova3.csv", quote=F, row.names=F, col.names=F)
-
-
-

Processamento/processamento.R

@@ -68,7 +68,6 @@ data_comp = cbind(data_comp, nota.teoria = (data_geral$media.parcial.teoria * 0.
                   nota.final = data_geral$nota.final.teoria)
 
 #salvando os dados nas tabelas
-
 write.csv(data_c1, "AgrupamentoExercicios.csv")
 write.csv(data_c2, "AgrupamentoAtividade.csv")
 write.csv(data_comp, "uc4.csv")

US15 - classificacao das submissoes.R

@@ -1,6 +1,7 @@
-# US15 
-# Iury Gregory - 
-1312818964 -1312808400
+# Classifica as submissões como dentro e fora de horário de aula
+# Iury Gregory LA2.0 (Março 2013)
+#- 1312818964 -1312808400
+
 exercicios <- read.csv("dados/exercicios-20112.csv",header=F)
 colnames(exercicios) <- c("matricula","questao","turma","data.hora","status","nota")
 geral <- read.csv("dados/Geral.csv",header=T)

US2 - Automatização.R

@@ -1,4 +1,4 @@
-# Codigo que cria as tabelas dos agrupamentos dos dados
+# Codigo que cria as tabelas dos agrupamentos dos dados
 # Andrey Menezes - versão 2.0 (Fevereiro 2013)
 
 #dados usados
@@ -9,11 +9,11 @@ prova.um = read.csv("../dados/Prova1.csv")
 prova.dois = read.csv("../dados/Prova2.csv")
 prova.tres = read.csv("../dados/Prova3.csv")
 
-#Script de automatiza??o UC3 e UC4
+#Script de automatizacao UC3 e UC4
 source("../Processamento/processamento.R")
 
-#Script de automatiza??o UC1
+#Script de automatizacao UC1
 source("../Processamento/UC1-A Priori.R")
 
-#Script de automatiza??o UC2
+#Script de automatizacao UC2
 source("../Processamento/UC2.R")