ANOVA of Model 1 [General Sta­tis­tics]

posted by Helmut Homepage – Vienna, Austria, 2024-10-04 12:11 (230 d 09:52 ago) – Posting: # 24215
Views: 3,803

Hi BEQool,

you have a point!

anova1 <- anova(model1)
num    <- as.numeric(anova1["group:treatment", c(3, 1)])
denom  <- as.numeric(anova1["group:sequence:subject", c(3, 1)])
cat(pf(num[1] / denom[1], num[2], denom[2], lower.tail = FALSE), "\n")

Gives for the first símulation above:

0.1501297


However, I’m puzzled because then p(G×T) of our meta study are not uniformly distributed any more. :confused:

[image][image]

Compare them to these plots.

Dif-tor heh smusma 🖖🏼 Довге життя Україна! [image]
Helmut Schütz
[image]

The quality of responses received is directly proportional to the quality of the question asked. 🚮
Science Quotes

Complete thread:

UA Flag
Activity
 Admin contact
23,424 posts in 4,927 threads, 1,680 registered users;
52 visitors (0 registered, 52 guests [including 14 identified bots]).
Forum time: 22:03 CEST (Europe/Vienna)

Being really good at C++ is like being really good
at using rocks to sharpen sticks.    Thant Tessman

The Bioequivalence and Bioavailability Forum is hosted by
BEBAC Ing. Helmut Schütz
HTML5