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?