Re: 오늘의 마지막 문제: R 에 내장된 데이터중 Groceries 를 이용해서 연관 규칙 분석을

[19기_신지혜]

# 필요한 패키지 설치 및 로드
if (!require("arules")) {
  install.packages("arules")
  library(arules)
}

# Groceries 데이터 로드
data("Groceries")

# 데이터 요약 확인
summary(Groceries)
colSums(is.na(Groceries))

# 처음 5개의 트랜잭션 확인
inspect(Groceries[1:5])

# 데이터의 전체 구조 확인
str(Groceries)

rules <- apriori ( Groceries, parameter=list(supp=0.01, conf=0.5))
rules2 <- apriori ( Groceries, parameter=list(supp=0.01, conf=0.5))
summary(rules)


# 결과 확인
a <- inspect(sort(rules))
b <- a[order(a$lift, decreasing=T), ]
c <- b[1:10, ]
c