Fix minor issues

input.R

@@ -7,8 +7,6 @@ library(rlog)
 #' - `genes` will be a table with metadata on human genes.
 #' - `species` will contain metadata on each species.
 #' - `distances` will contain each species' genes' distances to the telomere.
-#'
-#' @seealso [load_data_cached()]
 load_input <- function(path) {
     genes <- fread(paste(path, "genes.tsv", sep = "/"))
     original_species <- fread(paste(path, "species.csv", sep = "/"))

server.R

@@ -24,6 +24,7 @@ server <- function(input, output) {
     output$genes <- renderDT({
         datatable(
             filtered()[, .(.I, name, chromosome, cluster_length, cluster_mean)],
+            rownames = FALSE,
             colnames = c(
                 "Rank",
                 "Gene",