错误:`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)
完美!非常感谢。