summaryrefslogtreecommitdiff
path: root/3808/CH7/EX7.10/Ex7_10.sce
diff options
context:
space:
mode:
Diffstat (limited to '3808/CH7/EX7.10/Ex7_10.sce')
-rw-r--r--3808/CH7/EX7.10/Ex7_10.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/3808/CH7/EX7.10/Ex7_10.sce b/3808/CH7/EX7.10/Ex7_10.sce
new file mode 100644
index 000000000..696b872c8
--- /dev/null
+++ b/3808/CH7/EX7.10/Ex7_10.sce
@@ -0,0 +1,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