r - 这个列表命名分配有什么问题？

Question

伙计们——

我将在这里保持我的代码简短，因为我认为对于那些更熟悉 R 的人来说，这将是显而易见的。我正在尝试使用一个函数（不是我自己的），该函数需要我为其提供一个命名参数列表的列表。我无法通过我为创建每个列表元素而编写的函数命名列表。这是我的功能：

# for invoking grts
stratumdesign<- function(ns, points, oversamp) {
    stratumname<-as.character(ns)
    print("from function")
    print(stratumname)

    designlist<-list(ns=c(panel=points, seltype="Equal", over=oversamp))
    return(designlist)
}

..我尝试过让函数调用都将ns作为原始代码中的整数，或者作为字符传递。都不工作。我在这里用函数向自己说明的是，ns 被正确传递给函数，但是当我希望它是传递给 AS ns 的值时，返回的结果列表总是命名为“$ns”！我到底做错了什么，在这里？

Answer 1

因为这值得一个实际的答案，而不仅仅是评论......

尝试更多类似的东西：

stratumdesign<- function(ns, points, oversamp) {
    print("from function")
    print(stratumname)

    designlist<-list(c(panel=points, seltype="Equal", over=oversamp))
    names(designlist) <- as.character(ns)
    return(designlist)
}