Ошибка: false
должен быть символьным вектором, а не factor
объектом
Я хочу использовать этот код. Это копия вставки от человека, где он работает
library(tidyverse)
library(dplyr)
library(knitr)
isok.60 <- read.csv("~/Documents/StrengthTest/strengthTests.csv")%>%
filter(!is.na(load), timepoint %in% c("pre", "post"),
exercise == "isok.60") %>%
mutate(timepoint = if_else(timepoint == "session1",
"pre", timepoint)) %>%
group_by(subject, timepoint, group, sex) %>%
summarise(load = mean(load, na.rm = TRUE)) %>%
pivot_wider(names_from = timepoint,
values_from = load) %>%
mutate(change = ((post - pre)/pre) * 100,
pre.mc = pre - mean(pre))%>%
ungroup() %>%
mutate(pre.mc = pre - mean(pre))