G木木夕 2016-07-14 03:57 采纳率: 33.3%
浏览 4998

R语言,自写函数多个返回值?谢谢~(哪个大神能帮审一下代码)

fun.den <- function(d,vmax){ #data
M1 <- density(d[,1], na.rm=TRUE,from=0 ,to=vmax)
M2 <- density(d[,2], na.rm=TRUE,from=0 ,to=vmax)
M3 <- density(d[,3], na.rm=TRUE,from=0 ,to=vmax)
M4 <- density(d[,4], na.rm=TRUE,from=0 ,to=vmax)
M5 <- density(d[,5], na.rm=TRUE,from=0 ,to=vmax)
M6 <- density(d[,6], na.rm=TRUE,from=0 ,to=vmax)
M7 <- density(d[,7], na.rm=TRUE,from=0 ,to=vmax)
M8 <- density(d[,8], na.rm=TRUE,from=0 ,to=vmax)
M9 <- density(d[,9], na.rm=TRUE,from=0 ,to=vmax)
M10 <- density(d[,10], na.rm=TRUE,from=0 ,to=vmax)
M11 <- density(d[,11], na.rm=TRUE,from=0 ,to=vmax)

C12 <- density(d[,12], na.rm=TRUE,from=0 ,to=vmax)
C13 <- density(d[,13], na.rm=TRUE,from=0 ,to=vmax)
C14 <- density(d[,14], na.rm=TRUE,from=0 ,to=vmax)
C15 <- density(d[,15], na.rm=TRUE,from=0 ,to=vmax)
C16 <- density(d[,16], na.rm=TRUE,from=0 ,to=vmax)
C17 <- density(d[,17], na.rm=TRUE,from=0 ,to=vmax)
C18 <- density(d[,18], na.rm=TRUE,from=0 ,to=vmax)
C19 <- density(d[,19], na.rm=TRUE,from=0 ,to=vmax)

re <- list(M1,M2,M3,M4,M5,M6,M7,M8,M9,M10,M11,C12,C13,C14,C15,C16,C17,C18,C19)
return(re) #check change #check over
}
fun.den(mydataframe,2000000)
不报错,为什么

re
Error: object 're' not found
到底如何return?还是问题不在这?
#我造这种编码方式有点low,但这个问题是怎么回事?

  • 写回答

1条回答 默认 最新

  • 小灸舞 2016-07-22 07:39
    关注

    你这个re是函数内的一个局部变量,当然是not found
    你要取返回值应该写成:

     re <- fun.den(mydataframe,2000000)
    
    评论

报告相同问题?

悬赏问题

  • ¥15 HFSS 中的 H 场图与 MATLAB 中绘制的 B1 场 部分对应不上
  • ¥15 如何在scanpy上做差异基因和通路富集?
  • ¥20 关于#硬件工程#的问题,请各位专家解答!
  • ¥15 关于#matlab#的问题:期望的系统闭环传递函数为G(s)=wn^2/s^2+2¢wn+wn^2阻尼系数¢=0.707,使系统具有较小的超调量
  • ¥15 FLUENT如何实现在堆积颗粒的上表面加载高斯热源
  • ¥30 截图中的mathematics程序转换成matlab
  • ¥15 动力学代码报错,维度不匹配
  • ¥15 Power query添加列问题
  • ¥50 Kubernetes&Fission&Eleasticsearch
  • ¥15 報錯:Person is not mapped,如何解決?