R语言中的t检验

      两个数组的数据如下:

     请用R语言，实现该数据的t检验。代码如下：

> data1 <- read.table("d:/R_work/data/t.txt", header=T)
> bmi <- data1$weight/data1$height^2
> t.test(bmi, mu=22.5)

                                    图（1）t检验的结果

      说明: t.test() 表示调用R语言中的 t检测函数，目录d:/R_work/data/t.txt采用的是正斜杠“/” 。