Publications by Faza

One Way Anova 2

One Way Anova set.seed(123) wilayah <- factor(rep(c("Wilayah A", "Wilayah B", "Wilayah C"), each=30)) penjualan <- c(rnorm(30, mean=500, sd=50), # Penjualan Wilayah A rnorm(30, mean=550, sd=60), # Penjualan Wilayah B rnorm(30, mean=600, sd=55)) # Penjualan Wilayah C data <- data.frame(wilayah, penjualan) head...

37 sym 2 img

Regresi Linear Berganda dalam Perekonomian

price <- c(100, 110, 120, 130, 140, 150, 160, 170, 180, 190) marketing_cost <- c(20, 25, 22, 30, 35, 40, 42, 45, 50, 55) stores <- c(50, 52, 55, 58, 60, 62, 65, 67, 70, 72) income <- c(5000, 5200, 5400, 5600, 5800, 6000, 6200, 6400, 6600, 6800) sales_volume <- c(200, 220, 210, 230, 240, 250, 260, 270, 280, 290) data <- data.frame(price, market...

16 sym 2 img

Clustering dalam Perekonomian dengan R

data <- data.frame( Client_ID = 1:30, Annual_Income = c(60,85, 45, 70, 30, 95, 40, 75, 50, 90, 55, 80, 40, 65, 85, 50, 75, 30, 90, 40, 60, 70, 50, 80, 45, 65, 90, 35, 75, 55), Spending_Score = c(50, 20, 75, 30, 90, 15, 85, 40, 65, 25, 55, 35, 70, 45, 25, 60, 30, 85, 20, 75, 65, 50, 80, 35, 70, 55, 30, 85, 25, 60), Account_Balance = c(25, 40, 15, 35...

25 sym R (13524 sym/20 pcs) 2 img