2019-08-15 08:26:33 +00:00
|
|
|
source("drawDiagramSingle.R")
|
|
|
|
|
|
|
|
|
|
# set error messages test to english
|
|
|
|
|
Sys.setenv(LANG = "en")
|
|
|
|
|
|
|
|
|
|
#load samples
|
2019-08-16 08:20:07 +00:00
|
|
|
inputFileName ="data.csv"
|
2019-08-15 08:26:33 +00:00
|
|
|
samples <- read.delim(inputFileName, , sep=",")
|
|
|
|
|
|
|
|
|
|
drawDiagramSingle(samples)
|
|
|
|
|
|
2019-08-26 16:00:23 +00:00
|
|
|
# TODO move to a separate module
|
2020-10-24 08:29:04 +00:00
|
|
|
#library(Hmisc)
|
|
|
|
|
#rcorr(samples$Counter,samples$DMM, type="pearson")
|
2019-08-26 16:00:23 +00:00
|
|
|
|
