R语言自定义函数 返回值变量名是变化的怎么办？

Question

我用R自定义了一个函数，目的是得到一个变量名不定的数据框，方便我后续直接用循环批量处理数据，得到多个不同名字的数据框，所以我函数的返回值的变量名是不固定的，请问怎么返回呀？？？

myLB <- function(x,t){
  t <- 3
  tmp <- 6
  x1 <- names(b9[t])
  x2 <- names(b9[tmp])
  mytable <- xtabs(~ 日期+b9[[t]]+b9[[tmp]],data=b9)
  ftable(mytable)
  margin.table(mytable, 1)
  margin.table(mytable, 2)
  margin.table(mytable, 3)
  margin.table(mytable, c(1,3))
  xx <- as.data.frame(ftable(prop.table(mytable, c(1,2))))
  names(xx)[] <- c("日期",x1,x2,"频率")
  assign(paste('N',x1,x2,sep = ""),xx)
  tmp <- tmp+1
  return(paste('N',x1,x2,sep = ""))
}

本来这么编的，调用函数后，报错了

因为函数只返回了数据框的名字，没有内容!!!!求问怎么办啊啊啊啊啊啊啊啊啊！！！！

myLB(b9,3)
[1] "N性别体感热度"
> dim(N性别体感热度)
错误: 找不到对象'N性别体感热度'

Answer 1

不知道你这个问题是否已经解决, 如果还没有解决的话:

• 这篇文章：R语言-快速更改数据集的变量名 也许能够解决你的问题，你可以看下

如果你已经解决了该问题, 非常希望你能够分享一下解决方案, 以帮助更多的人 ^-^