PPT Slide
% data: example( Id, Class, [A1=V1,…,An=Vn]).
% max P(Diag | Symptoms)
bayes(Sympt,Diag,PD) :-
setof(C,Id^AV^example(Id,C,AV),Class),
findall(C/P,(member(C,Class),
cond_prob(Sympt,C,PSC),
prob(C,PC),
P is PSC*PC),All),
max(All,Diag/PD).
max([X/M|T],Z/K) :-
max(T,Z/K), K>M, !.
max([X/M|_],X/M).
Previous slide
Next slide
Back to first slide
View graphic version