p-value

> path_set <- "H:/"
> path_groups <- "proteingroups.txt"
> path_psms <- "psms.txt"
> path_out <- "proteingroups.csv"
> source("H:\program_home\p_value_2017-2-5.R")
> p_value_get(path_set,path_groups,path_psms,path_out)