15 lines
302 B
R
15 lines
302 B
R
|
# Rscript summary handshake-duration.txt
|
||
|
|
|
||
|
|
require(grDevices) # for colours
|
||
|
|
|
||
|
|
tbl <- read.table(file=commandArgs(TRUE)[1])
|
||
|
|
val <- tbl[1]
|
||
|
|
|
||
|
|
summary(val)
|
||
|
|
# standarddeviation=sd(unlist(val))
|
||
|
|
sd(unlist(val))
|
||
|
|
# print (standarddeviation, zero.print="standard deviation: ")
|
||
|
|
|
||
|
|
# confint.default (val)
|
||
|
|
t.test (val)
|