# NOT RUN {
#Read in example summary statistics dataset from csv
summarydata_ex <- read.csv(system.file("extdata", "example_data1.csv", package="pKSEA"))
#Get matched data using predictions from NetworKIN
matched_data_ex <- get_matched_data(summarydata_ex, NetworKINPred_db)
#Perform single run of pKSEA analysis
single_run_results_ex <- run_on_matched(matched_data_ex, n_permutations = 10)
#Export results to R session temporary directory
# }
# NOT RUN {
results_write(single_run_results_ex, outputpath= tempdir(), outputname= "example")
# }
Run the code above in your browser using DataLab