From a27137a2b145f0fb1c97e53f1a44aa64595250e3 Mon Sep 17 00:00:00 2001
From: Matan Horovitz <matanhorovitz@protonmail.com>
Date: Fri, 26 May 2023 00:12:11 +0300
Subject: [PATCH] Merde 2

---
 merde_2.R | 31 +++++++++++++++++++++++++++++++
 1 file changed, 31 insertions(+)
 create mode 100644 merde_2.R

diff --git a/merde_2.R b/merde_2.R
new file mode 100644
index 0000000..3b17973
--- /dev/null
+++ b/merde_2.R
@@ -0,0 +1,31 @@
+n=36
+x_init=0.46 #<proportion - p - parameter
+x_finit=0.38
+#---Step 1 - define the hypothesis
+#H0: p = 0.46
+#H1: p!= 0.46
+#---Step 2 - define the assumptions and distribution shape
+#1. Assume normal distribution
+#2. Assume random, unbiased sampling
+#3. p`= p = 0.46 -  H0 is assumed true
+#4. stderr of p` = sqrt((q*p)/n)
+
+#---Step 3 - determine where a (alpha) is, define criterion
+a=0.02 #0.04/2 Assumption: H1 (double tail)
+Zc=2.05 #<given
+#stderr=sqrt(((0.46-0.38)^2)/35) #<what is this misery?
+#^this is nonsense
+
+#---Step 4 - ???
+#stderr=sqrt(((0.46-0.38)^2)/35) #<Is it this thing? it it this bastard?
+#Zp`^
+Zptag=(0.38-0.46)#/@p`
+#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+a=0.05
+x=5
+s=1.5
+n=15
+s2<s
+#Is s` the same as s in this case?
+#s` pushes upwards - this is a rear tail - possibly different result! (?)
+#What on earth is a t test?
\ No newline at end of file