Klub Fitness Buitenzorg memiliki data member dengan informasi berikut. Narasi lainnya bisa ditambahkan.
## 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
## 7 RADEN SETIYADI 4 1 3 Mod-1 >40
## 8 HERMIN PRIHARTINI 4 1 3 Mod-1 >40
## 9 RORRY HARTONO 5 1 3 Mod-1 >40
## 10 ALBERTUS TRI TJAHJONO B W 0 2 1 Mod-2 <20
## 11 SULARNO 2 2 1 Mod-2 <20
## 12 ENDANG SULISTYOWATI 1 2 1 Mod-2 <20
## 13 ARNI 4 2 2 Mod-2 20-40
## 14 PAULUS SETIABUDI 2 2 2 Mod-2 20-40
## 15 EDDY RAHARJO 1 2 2 Mod-2 20-40
## 16 SIH MULYONO 5 2 3 Mod-2 >40
## 17 KHOZIN HASAN 5 2 3 Mod-2 >40
## 18 KUNTI BASTHONA 0 2 3 Mod-2 >40
## 19 SRI BANUN BUDI NASTITI 3 3 1 Mod-3 <20
## 20 AHMAD SUYUDI 4 3 1 Mod-3 <20
## 21 PRIJO ANGGORO BUDI RAHARDJO 8 3 1 Mod-3 <20
## 22 AGUS RIYANTO 2 3 2 Mod-3 20-40
## 23 TAUFIQ ROHMAN 2 3 2 Mod-3 20-40
## 24 SUWARTI 4 3 2 Mod-3 20-40
## 25 RENNY SENSIYATI S 2 3 3 Mod-3 >40
## 26 PRASETYO ARIBOWO 1 3 3 Mod-3 >40
## 27 PURWANTO BUDHI SANTOSA 2 3 3 Mod-3 >40
## 28 INDAH 4 4 1 Mod-4 <20
## 29 HENNY INDRIYANTI 2 4 1 Mod-4 <20
## 30 WIDODO INDRO SAPUTRO 2 4 1 Mod-4 <20
## 31 RONNY ROEKMITO 5 4 2 Mod-4 20-40
## 32 NURDJANA ALAMRI 3 4 2 Mod-4 20-40
## 33 EMIYATI 2 4 2 Mod-4 20-40
## 34 HANY SRI SUHARLIN 6 4 3 Mod-4 >40
## 35 WAKIDI 4 4 3 Mod-4 >40
## 36 BUNYAMIN 4 4 3 Mod-4 >40cor.test(DataMember$Berat, DataMember$Umur)##
## Pearson's product-moment correlation
##
## data: DataMember$Berat and DataMember$Umur
## t = 0.22118, df = 34, p-value = 0.8263
## alternative hypothesis: true correlation is not equal to 0
## 95 percent confidence interval:
## -0.2942957 0.3619334
## sample estimates:
## cor
## 0.0379049Hasil pengujian korelasi menunjukan bahwa tidak ada korelasi antara umur member dengan tingkat penurunan berat badan dengan skor korelasi sebesar 0.03.
AnovaModel2Arah <- lm(data = DataMember,
formula = Berat~grpMetode*grpUmur)
anova(AnovaModel2Arah)## Analysis of Variance Table
##
## Response: Berat
## Df Sum Sq Mean Sq F value Pr(>F)
## grpMetode 3 23.111 7.7037 3.0476 0.04811 *
## grpUmur 2 0.667 0.3333 0.1319 0.87709
## grpMetode:grpUmur 6 31.556 5.2593 2.0806 0.09350 .
## Residuals 24 60.667 2.5278
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1Hasil uji pengaruh metode dan umur terhadap keberhasilan penurunan berat badan, secara statistik menggunakan ANOVA, menunjukan bahwa penerapan metode memberi dampak yang signifikan terhadap keberhasilan penurunan berat badan sementara penngelompokan umur tidak memberi dampak yang signifikan.
Silahkan diisi sendiri