###Import Data AeroGym ## LATIHAN ANOVA
ANOVA adalah metode pengujian yang mirip dengan fungsi t.test namun ANOVA memberikan kemungkinan untuk melakukan pengujian terhadap lebih dari dua variabel dengan salah satunya merupakan dependent variabel dan lainnya merupakan independent variabel.
Berikut ini adalah contoh penggunaan ANOVA untuk melihat dampak atau pengaruh metode pelatihan terhadap penuruunan berat badan dengan memeperlihatkan juga umur seseorang. Data di peroleh dari lembaga Fitnes AeroGym
AeroGym Menyediakan data berupa file csv yang terdiri dari:
This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see http://rmarkdown.rstudio.com.
When you click the Knit button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:
{r echo=FALSE, warning=FALSE} DataFitnes <- read.csv(“Data Fitnes.csv”)
##Perlu Install.packages Library (“Car”)
library(car)
head(DataFitnes)
Data tersebut kemudian dikelompokkan berdasarkan Metode training dan kelompok umur sehingga menjadi seperti di bawah ini
{r echo=FALSE, warning=FALSE} DataFitnes\(grpMetode <- cut(DataFitnes\)Metode, breaks = c(0, 1, 2, 3, Inf), labels = c(“Mod-1”,“Mod-2”,“Mod-3”,“Mod-4”))
DataFitnes\(grpUmur <- cut(DataFitnes\)Umur, breaks = c(0, 1, 2, Inf), labels = c(“<20”,“20-40”,“>40”))
head(DataFitnes)
summary(cars)
## speed dist
## Min. : 4.0 Min. : 2.00
## 1st Qu.:12.0 1st Qu.: 26.00
## Median :15.0 Median : 36.00
## Mean :15.4 Mean : 42.98
## 3rd Qu.:19.0 3rd Qu.: 56.00
## Max. :25.0 Max. :120.00
You can also embed plots, for example:
Note that the echo = FALSE parameter was added to the code chunk to prevent printing of the R code that generated the plot.