summaryrefslogtreecommitdiff
path: root/3808/CH7/EX7.10/Ex7_10.sce
blob: 696b872c87d5988895307458f8d919418ab3a920 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//Chapter 07: Discrete Probability

clc;
clear;

s_total_msg=2000     //spam messages total
spam_msg=250       //occurrence of 'Rolex' in spam
nspam_msg=5       //occurrence of 'Rolex' in not know to be spam
ns_total_msg=1000//not spam messages total
threshold=0.9
p=spam_msg/s_total_msg
q=nspam_msg/ns_total_msg
r=p/(p+q)

if r>threshold then
    disp(r,'R=')
    disp('Reject')
end