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