我正在将 R 版本3.6.1与以下软件包一起使用:
class Bar(Foo):
def yourmethod(self):
pass
Bar()
我的代码看起来像这样:
library(data.table)
library(haven)
library(psych)
library(dplyr)
library(stringr)
library(xtable)
library(ggplot2)
library(stats)
library(car)
library(pander)
library(lm.beta)
library(lavaan)
对于第二个“子集”调用,我得到了众所周知的错误“错误:dat <- as.data.frame(read_spss("w"))
d<-as.data.frame(subset(dat,select = c("q","r","s","t","u","x","y","z")))
d$x<-recode(d$x, "1='J';2='M'")
nvalid <- function(x) sum(!is.na(x))
d$a<-apply(as.matrix(d[c("q","r","s")]), 1, mean, na.rm = TRUE)
d$counts <- apply(as.matrix(d[c"q","r","s")]), 1, nvalid)
d$a<-ifelse(d$counts>=6,d$a,NA)
d$d<-as.numeric(scale(d$t))
d$e<-as.numeric(scale(d$y))
d$f<-as.numeric(scale(d$z))
d$g<-apply(as.matrix(d$d,d$e,d$f), 1, mean, na.rm = TRUE)
d$counts<-apply(as.matrix($d,d$e,d$f), 1, nvalid)
d$g<-ifelse(d$counts>=1,d$g,NA)
d$h<-recode(d$u, "1='N';2='M'")
rm(nvalid)
d<-subset(d,select=c("a","b","c","x", "y", "z"),
!is.na(d$x) &
!is.na(d$y) &
!is.na(d$z))
和x
必须是同一类型”。我已经读过几个线程,它可能与软件包的顺序以及避风港软件包的label-function / S3方法与其他软件包(Hmisc和其他软件包)冲突有关。但是,我无法找到一个好的解决方法,甚至无法解决该问题。另外...我再也无法运行lm或rcorr之类的一些基本分析,并且继续收到此错误。
如果有人可以帮助我提示如何解决该问题,我将非常高兴。预先感谢。