Whole dataset:
suppressMessages(library(miRNAselector)) dane = data.table::fread("data_start.csv") x = dplyr::select(dane, starts_with("hsa")) DE = ks.miRNA_differential_expression(x, klasy = dane$Class,) data.table::fwrite(DE, "DE_wholedataset.csv") ks.table(DE)
Training set only:
suppressMessages(library(miRNAselector)) dane = data.table::fread("mixed_train.csv") x = dplyr::select(dane, starts_with("hsa")) DE = ks.miRNA_differential_expression(x, klasy = dane$Class,) data.table::fwrite(DE, "DE.csv") ks.table(DE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.