【发布时间】:2016-04-23 01:53:41
【问题描述】:
我尝试在 R Markdown 中运行我的脚本。它不运行并给出以下错误:
从第 15-139 行退出 (m.Rmd)
错误$<-.data.frame(*tmp*, "efavirens", value = integer(0)) :
替换有 0 行,数据有 5794
调用: ... withVisible -> eval -> eval -> $ $
以下是部分脚本:
```{r, echo=FALSE}
suicidio <- read.csv2("E:/Spss/suicidio4.csv",header=T,sep=";")
str(suicidio)
suicidio<-subset(suicidio,desfecho != 9)
suicidio2<-subset(suicidio,Desfecho2 != 9)
suicidio$tempo<-as.numeric(suicidio$tempo)
suicidio$dias_inicio[suicidio$dias_inicio_cont == "#NULO!"]<-NA
suicidio$dias_fim[suicidio$dias_fim_cont == "#NULO!"]<-NA
suicidio$cor[suicidio$A19_COR == "#NULO!"]<-NA
suicidio$sexo<-factor(suicidio$sexo)
suicidio$cor<-factor(suicidio$cor)
suicidio$obito<-factor(suicidio$obito)
suicidio$escol2<-factor(suicidio$escol3)
suicidio$idade_hiv_cat<-factor(suicidio$idade_hiv_cat2)
suicidio$idade_hiv_cat<-factor(suicidio$idade_dtfim_cat)
suicidio$acomp_regular<-factor(suicidio$acomp_regular)
suicidio$drogas<-factor(suicidio$drogas)
suicidio$alcool<-factor(suicidio$alcool)
suicidio$efavirens<-factor(suicidio$efavirens)
suicidio$epilepsia<-factor(suicidio$epilepsia)
suicidio$tentativa<-factor(suicidio$tentativa)
suicidio$causa_externa<-factor(suicidio$causa_externa)
suicidio$causa_externa<-factor(suicidio$transgen)
suicidio$causa_externa<-factor(suicidio$cate_expo2)
suicidio$causa_externa<-factor(suicidio$etnia
)
library(survival)
y<-Surv(suicidio$tempo,suicidio$desfecho)
有人可以帮我吗?
【问题讨论】:
-
如果我的回答解决了您的问题,请将其标记为已接受的答案(如果没有,请随时发表评论)
标签: r r-markdown