Analisis Data Klub Fitnes Buitenzorg

## Loading required package: carData

Data CFtiness diperoleh pada tanggal 21 Januari 2022 yang berisi data sebagai berikut:

##                 MemberName Berat Metode Umur grpMetode grpUmur
## 1        NUR MEI CHASANATI     5      1    1     Mod-1     <20
## 2                 SUPRAPTO     4      1    1     Mod-1     <20
## 3             TITI PRIYONO     5      1    1     Mod-1     <20
## 4                   SUSENO     5      1    2     Mod-1   20-40
## 5              ALIP ASMADI     6      1    2     Mod-1   20-40
## 6 IRAWAN EKOBOEDJO MARGONO     2      1    2     Mod-1   20-40
## Anova Table (Type II tests)
## 
## Response: Berat
##            Sum Sq Df F value Pr(>F)
## grpUmur     0.667  2  0.0954 0.9093
## Residuals 115.333 33

Hasil analisis ANOVA menunjukan bahwa kelompok umur tidak berpengaruh pada perubahan berat badan setelah melakukan kegiatan fitnes selama satu bulan.

AnovaModel2Arah <- lm(data = DataMember, 
                      formula = Berat~grpMetode*grpUmur)
Anova(AnovaModel2Arah)
## Anova Table (Type II tests)
## 
## Response: Berat
##                   Sum Sq Df F value  Pr(>F)  
## grpMetode         23.111  3  3.0476 0.04811 *
## grpUmur            0.667  2  0.1319 0.87709  
## grpMetode:grpUmur 31.556  6  2.0806 0.09350 .
## Residuals         60.667 24                  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

Sementara hasil analisis ANOVA menggunakan kombinasi kelompok umur dan kelompok metode, secara statistik, menunjukan bahwa pembagian kelompok menurut metode pelatihan cukup signifikan.