> KMO(mydata1)
Kaiser-Meyer-Olkin factor adequacy
Call: KMO(r = mydata1)
Overall MSA =  0.57
MSA for each item =
  x1   x2   x3   x4   x5
0.23 0.60 0.59 0.55 0.70

> bartlett.test(mydata1)

        Bartlett test of homogeneity of variances

data:  mydata1
Bartlett's K-squared = 1471, df = 4, p-value < 2.2e-16

请问上面kmo和bartlett.test检验后红色字体的数据怎么提取出来？代码是什么