R로 배우는 사기 탐지
Tim Verdonck
Professor Data Science at KU Leuven
목표
다른 노드의 행동을 바탕으로 특정 노드의 행동을 예측함

과제

비관계 모델

관계 모델

가정

사기 확률
$$P(F | ?) = \frac{1 + 1}{1 + 1 + 1 + 1 + 1}=\frac{2}{5}= 40\%$$

사기 확률
$$P(F | ?) = \frac{1 + 2}{3 + 1 + 1 + 2 + 1}=\frac{3}{8}=37.5\%$$

vertex_attr(network) ## 노드는 1(사기), 0(비사기), NA(미확인)으로 라벨링됨
$name
"?" "B" "C" "D" "E" "A"
$isFraud
NA 1 0 1 0 0
edge_attr(network) ## 간선에는 가중치가 있음$weight
2 3 1 1 1
## subgraph(): 노드 "?"와 모든 사기 노드를 포함하는 서브그래프 생성 subnetwork <- subgraph(network, v = c("?", "B", "D"))## strength(): 노드 "?" 인접 간선 가중치 합산 prob_fraud <- strength(subnetwork, v = "?") / strength(network, v = "?")prob_fraud
0.375
R로 배우는 사기 탐지