englishize it all

alai.R

@@ -2,4 +2,5 @@ source("config.R")
 
 if (!exists("dbListTables", mode = "function")) source("mysql.R")
 
-source("distribucion_normal.R")
+source("normal_distribution.R")
+source("time_series.R")

mysql.R

@@ -9,7 +9,7 @@ conn <- dbConnect(
     port = dbport
 )
 
-consulta_frames <- "
+query_frames <- "
 SELECT
     f.coins, CAST((f.elapsed_time / 1000) AS INT)
 FROM game g

normal_distribution.R

@@ -1,4 +1,4 @@
-result <- dbSendQuery(conn, consulta_frames)
+result <- dbSendQuery(conn, query_frames)
 data <- fetch(result)
 
 get_variance <- function(dataset = vector(), mean = 0) {