HyperlipidR <- data.frame(Data_Latihan_Biostat_RS1) str(HyperlipidR) HyperlipidR\(Gender <- as.factor(HyperlipidR\)Gender) HyperlipidR\(Edema <- as.factor(HyperlipidR\)Edema)