错误:`false`必须是字符向量,而不是`factor`对象

错误:`false`必须是字符向量,而不是`factor`对象,r,R,错误:false必须是字符向量,而不是因子对象 我想用这个代码。这是一个复制粘贴工作的人 library(tidyverse) library(dplyr) library(knitr) isok.60 <- read.csv("~/Documents/StrengthTest/strengthTests.csv")%>% filter(!is.na(load), timepoint %in% c("pre", "post"), exercise == "i

错误:
false
必须是字符向量,而不是
因子
对象

我想用这个代码。这是一个复制粘贴工作的人

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)) 

库(tidyverse)
图书馆(dplyr)
图书馆(knitr)
大约60%
过滤器(!is.na(加载),时间点%c(“前”、“后”),
练习==“isok.60”)%>%
变异(timepoint=if_else)(timepoint==“session1”,
“预”,时间点))%>%
分组依据(受试者、时间点、组、性别)%>%
总结(负荷=平均值(负荷,na.rm=真))%>%
枢轴(名称从=时间点),
值_from=负载)%>%
变异(变化=((后-前)/前)*100,
pre.mc=pre-平均值(pre))%>%
解组()%>%
变异(前mc=前平均值(前))

尝试添加
read.csv(…,stringsAsFactors=F)
完美!非常感谢。