%age<30---1;30~~40---2;>40----3
%income??low---1;medium----2;high----3
%student??no---0;yes----1
%credit_rating???fair---0;excellent----1
%buys_computer????no----0;yes----1
%1--age;2--income;3--student;4--credite_rating;5--buys_computer;
A=[1?1?3?0??0??0
????2?1?3?0?1?0
????3?2?3?0?0?1
????4?3?2?0?0?1
????5?3?1?1?0?1
????6?3?1?1?1?0
????7?2?1?1?1?1
????8?1?2?0?0?0
????9?1?1?1?0?1
????10?3?2?1?0?1
????11?1?2?1?1?1
????12?2?2?0?1?1
????13?2?3?1?0?1
????14?3?2?0?1?0];
X=[15?1?2?1?0?];
%樣本分為兩類
s1=0;s2=0;h1=0;h2=0;
for?k=1:14
????if?A（k6）==0
????????s1=s1+1;
????????
????????
????else
????????s2=s2+1;
????????
????????
????end
end
pyes=s2/14;
pno=s1/14;
for?k=1:14
????if?A（k2）==1
	if?A（k6）==0
	??h1=h1+1;
	else
	??h2=h2+1;
	end	

????end
end
p1=h1/s1;
p2=h2/s2;
h1=0;h2=0;
for?k=1:14
????if?A（k3）==2
	if?A（k6）==0
	??h1=h1+1;
	else
	??h2=h2+1;
	end	

????end
end
p1=p1*（h1/s1）;
p2=p2*（h2/s2）;	
h1=0;h2=0;
for?k=1:14
????if?A（k4）==1
	if?A（k6）==0
	??h1=h1+1;
	else
	??h2=h2+1;
	end	

????end
end
p1=p1*（h1/s1）;
p2=p2*（h2/s2）;
h1=0;h2=0;
for?k=1:14
????if?A（k5）==0
	if?A（k6）==0
	??h1=h1+1;
	else
	??h2=h2+1;
	end	

????end
end
p1=p1*（h1/s1）;
p2=p2*（h2/s2）;
pyes=pyes*p2;
pno=pno*p1;
if?pyes>pno
?disp（‘X樸素貝葉斯分類預(yù)測(cè)buys_computer=“yes“??‘）pyes
else
?disp（‘X樸素貝葉斯分類預(yù)測(cè)buys_computer=“no“??‘）pno
end