在家工作 #加载必要的包库(统计信息)库(gendata)库(pwr) #Q1 -----#如何创建r markdown#文件->新文件-> r markdown->标记它 #将循环用于r仿真TTestPVS <-numeric(1000) #为(1:1000中的i)创建一个循环set.seed(123){y1 <-rnorm(n = 100,平均值= 100,sd = 15)y2 <-rnorm(n = 100,平均值= 100,sd = 15)组<-rep(c(“ Group A”,“ Group B”),每个= 100)DV <-c(y1,y2)数据&l