r - R Sweave用户定义功能

我正在编写一个小函数，该函数提供了条件密度和经验累积分布图的组合。

cdpl<-function(df,dep,indep){
    attach(df)

    cdplot(dep~indep,xlab=deparse(substitute(indep)),ylab=deparse(substitute(dep)))
    g<-indep
    ec<-ecdf(indep)
    lines(knots(ec),as.numeric(names(table(ec(g)))),col="red",lw=3)
    detach(df)
    }

这很好，但是当我尝试编织它时，我的运气就全没了...

<<fig1,fig=T>>=
par(mfrow=c(1,2))
print(cdpl(tre,A,B))
print(cdpl(tre,A,C))
@

编织（“ re.rnw”）
写入文件re.tex
处理代码块...


1：回显项逐字EPS pdf（label = fig1）

错误：块1（label = fig1）
model.frame.default（formula = dep〜indep）中的错误：
变量“ dep”的无效类型（列表）

当它在外部编织良好时怎么办？

// M

最佳答案

而不是附加（导致所有类型的问题），而不是将数据帧作为cdplot中的data参数传递，然后查看是否可行。

关于r - R Sweave用户定义功能，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/3630036/