diff --git a/alai.R b/alai.R
index ce1ceaa..516a081 100644
--- a/alai.R
+++ b/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")
diff --git a/mysql.R b/mysql.R
index c53e9e8..8a32851 100644
--- a/mysql.R
+++ b/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
diff --git a/distribucion_normal.R b/normal_distribution.R
similarity index 98%
rename from distribucion_normal.R
rename to normal_distribution.R
index e714c06..b107986 100644
--- a/distribucion_normal.R
+++ b/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) {
diff --git a/time_series.R b/time_series.R
new file mode 100644
index 0000000..e69de29