What I entered in the console (alp, DF1, DF2 are defined):
LT <- left.tail=FALSE
q <- qf(alp, DF1, DF2, LT)
q
What I got:
LT <- left.tail=FALSE
Error in LT <- left.tail = FALSE : could not find function "<-<-"
> q <- qf(alp, DF1, DF2, LT)
> q
[1] 0.4490486
The answer I am looking for is 2.22, which I get when the Lower Tail is defined as false.
Why is it telling me that "<-<-" is not avaible, I did not write this function? And is there a way to store a TRUE/ FALSE value for lower.tail?
For further explanation, I am trying to write a code where I simply have to enter the values on the top and get the answer out of it:
data.entry(1)
a1 <- mean(var2)
v1 <- var(var2)
SD1 <- sd(var2)
n1 <- max(n)
a2 <- mean(var3)
v2 <- var(var3)
SD2 <- sd(var3)
n2 <- max(n)
int <- 1-0.9 #given interval
LT <- FALSE #Right Tailed- H1: >/ =/=
TT <- 0 #Two Tailes- H1: = / =/=
alp.O <- 0.1 #Given Alpha
alp <- alp.O/(1+TT)
DF1 <- n1 - 1
DF2 <- n2 -1
q <- qf(alp, DF1, DF2, left.tail=LT) #ALP, DF1, DF2
f <- q-2*q*RT #t-Critical Value - Rejection Level
F <- v1/v2 #Parameter of Interest1 / Parameter of Interest2
print(F==f)
print(F>f)
print(F<f)
It's not done yet and there are some residuals from older code, please ignore them.