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

posted by Helmut Homepage – Vienna, Austria, 2024-10-04 12:11 (271 d 23:49 ago) – Posting: # 24215
Views: 6,019

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,425 posts in 4,928 threads, 1,684 registered users;
35 visitors (0 registered, 35 guests [including 14 identified bots]).
Forum time: 12:01 CEST (Europe/Vienna)

You can do one of two things; just shut up,
which is something I don’t find easy,
or learn an awful lot very fast,
which is what I tried to do.    Jane Fonda

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