From fd72b3426c5600d136a907c908dd0d91d37c4b4e Mon Sep 17 00:00:00 2001
From: Elias Projahn <elias@johrpan.de>
Date: Wed, 25 Aug 2021 12:03:11 +0200
Subject: [PATCH] Rename data to input

---
 data.R => input.R | 2 +-
 server.R          | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)
 rename data.R => input.R (98%)

diff --git a/data.R b/input.R
similarity index 98%
rename from data.R
rename to input.R
index 90fc717..7f7ded1 100644
--- a/data.R
+++ b/input.R
@@ -9,7 +9,7 @@ library(rlog)
 #' - `distances` will contain each species' genes' distances to the telomere.
 #'
 #' @seealso [load_data_cached()]
-load_data <- function(path) {
+load_input <- function(path) {
     genes <- fread(paste(path, "genes.tsv", sep = "/"))
     original_species <- fread(paste(path, "species.csv", sep = "/"))
 
diff --git a/server.R b/server.R
index 3424b28..d183c28 100644
--- a/server.R
+++ b/server.R
@@ -2,11 +2,11 @@ library(data.table)
 library(DT)
 library(shiny)
 
-source("data.R")
+source("input.R")
 source("scatter_plot.R")
 source("util.R")
 
-data <- run_cached("input", load_data, "input")
+data <- run_cached("input", load_input, "input")
 
 server <- function(input, output) {
     output$genes <- renderDT({