我在控制台中输入的内容(定义了 alp、DF1、DF2):
LT <- left.tail=FALSE
q <- qf(alp, DF1, DF2, LT)
q
我得到了什么:
LT <- left.tail=FALSE
Error in LT <- left.tail = FALSE : could not find function "<-<-"
> q <- qf(alp, DF1, DF2, LT)
> q
[1] 0.4490486
我正在寻找的答案是 2.22,当 Lower Tail 被定义为 false 时得到。
为什么它告诉我“<-<-”不可用,我没有写这个函数?有没有办法为 lower.tail 存储 TRUE/FALSE 值?
为了进一步解释,我正在尝试编写一个代码,我只需在顶部输入值并从中获取答案:
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)
它还没有完成,旧代码有一些残留,请忽略它们。