Commit 9abd2d30 authored by Etienne Rifa's avatar Etienne Rifa
Browse files

fix mu 2

parent 026849d7
......@@ -232,11 +232,10 @@ mod_Inputs_server <- function(id, r = r, session = session){
# options(encoding = "UTF-8")
# options(digits = 4, scipen = -2)
ds1 <- read.table(input$dataset1$datapath, sep = "\t", dec = ".", header = TRUE, stringsAsFactors = TRUE)
ds1 <- replace_mu(ds1)
row.names(ds1) <- glue::glue("{ds1[,1]}__{ds1[,3]}")
r_values$ds1 <- ds1
# print(unique(ds1[,3]))
r_values$ds1 <- replace_mu(ds1)
}
# else{
# print("no data")
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment