samples <- read.table("samples.txt")
print(samples)
t.test(samples$V1, samples$V2)