4/4
4/4
3/4
3/4
Generally speaking, though, Germans are extremely formal by default, and most profs will expect to be addressed this way. We're also one of the few countries where the "Höflichkeitsform" ("polite form")
2/4
Generally speaking, though, Germans are extremely formal by default, and most profs will expect to be addressed this way. We're also one of the few countries where the "Höflichkeitsform" ("polite form")
2/4
1/4
1/4
2/2
2/2
I PERSONALLY prefer the science slams that talk about your acutual scientific work, as opposed
1/2
I PERSONALLY prefer the science slams that talk about your acutual scientific work, as opposed
1/2
Hypothetically.
Hypothetically.
Bonus points: You easily get 0 counts if you expect numbers from 1:nbins, i.e.:
> tabulate(c(3, 1, 3, 3, 3), nbins = 4)
[1] 1 0 4 0
2/2
Bonus points: You easily get 0 counts if you expect numbers from 1:nbins, i.e.:
> tabulate(c(3, 1, 3, 3, 3), nbins = 4)
[1] 1 0 4 0
2/2
(But also with the release party being on October 3rd, a missed opportunity to use a "The Life of a Showgirl" reference.)
(But also with the release party being on October 3rd, a missed opportunity to use a "The Life of a Showgirl" reference.)
2/2
2/2
1/2
1/2
www.science.org/content/arti...
www.science.org/content/arti...
Unfortunately, he DIDN'T mention it, so I will never know why they were so worried what weird things he might say.
Unfortunately, he DIDN'T mention it, so I will never know why they were so worried what weird things he might say.
Crash the party like a record scratch as I scream
'Who's afraid of little old me?'
You should be"
Crash the party like a record scratch as I scream
'Who's afraid of little old me?'
You should be"
mm <- lmer(value ~ time + (1 | id), data = data)
mm_summary <- summary(mm)
# estimates
abs(mm_summary$coefficients["timet2", "Estimate"])
abs(t_test$estimate)
# pval
mm_summary$coefficients["timet2", "Pr(>|t|)"]
t_test$p.value
2/2
mm <- lmer(value ~ time + (1 | id), data = data)
mm_summary <- summary(mm)
# estimates
abs(mm_summary$coefficients["timet2", "Estimate"])
abs(t_test$estimate)
# pval
mm_summary$coefficients["timet2", "Pr(>|t|)"]
t_test$p.value
2/2
library(lmerTest)
n <- 1000
t1 <- rnorm(n)
t2 <- t1 + rnorm(n)
data <-
data.frame(
id = paste0("ID-", 1:n),
t1 = t1,
t2 = t2
)
data <-
data %>%
pivot_longer(c(t1, t2), names_to = "time")
1/2
library(lmerTest)
n <- 1000
t1 <- rnorm(n)
t2 <- t1 + rnorm(n)
data <-
data.frame(
id = paste0("ID-", 1:n),
t1 = t1,
t2 = t2
)
data <-
data %>%
pivot_longer(c(t1, t2), names_to = "time")
1/2