R语言 VGAM包 put.smart()函数中文帮助文档(中英文对照)

loveR

put.smart(VGAM)
put.smart()所属R语言包：VGAM

                                         Adds a List to the End of the List “.smart.prediction”
                                         列表添加到列表末尾的“。smart.prediction”

                                         译者：生物统计家园网 机器人LoveR

描述----------Description----------

Adds a list to the end of the list .smart.prediction in smartpredenv (R) or frame 1 (S-PLUS).
一个列表添加到列表末尾.smart.predictionsmartpredenv（R）或帧（S-PLUS）。


用法----------Usage----------


put.smart(smart)



参数----------Arguments----------

参数：smart
a list containing parameters needed later for smart prediction.  
需要一个列表，其中包含参数的智能预测。


Details

详细信息----------Details----------

put.smart is used in "write" mode within a smart function. It saves parameters at the time of model fitting, which are  later used for prediction. The function put.smart is the opposite of get.smart, and both deal with the same contents.
put.smart"write"模式，在智能功能。保存参数在时间模型拟合中，所购买用于预测。 put.smart的功能是相反的get.smart，都处理相同的内容。


值----------Value----------

Nothing is returned.
不返回任何值。


副作用----------Side Effects----------

The variable .smart.prediction.counter in smartpredenv (R) or frame 1 (S-PLUS) is incremented beforehand, and .smart.prediction[[.smart.prediction.counter]] is assigned the list smart.  If the list .smart.prediction in smartpredenv (R) or frame 1 (S-PLUS) is not long enough to hold smart, then it is made larger, and the variable .max.smart in smartpredenv (R) or frame 1 (S-PLUS) is adjusted accordingly.
变量.smart.prediction.counter：在smartpredenv（R）或1帧（S-PLUS）递增事先和.smart.prediction[[.smart.prediction.counter]]分配列表中smart。如果列表.smart.predictionsmartpredenv（R）或1帧（S-PLUS）是不足够的，以举行smart，然后它做得更大，和变量.max.smart的smartpredenv（R）或1帧（S-PLUS）进行相应的调整。


参见----------See Also----------

get.smart.
get.smart。


实例----------Examples----------


"my1" <- function(x, minx=min(x)) { # Here is a smart function[这是一个聪明的功能]
    x <- x  # Needed for nested calls, e.g., bs(scale(x))[所需要的嵌套调用，例如，BS（尺度（x））]
    if(smart.mode.is("read")) {
        smart  <- get.smart()
        minx &lt;- smart$minx          # Overwrite its value[覆盖它的值]
    } else
    if(smart.mode.is("write"))
        put.smart(list(minx=minx))
    sqrt(x-minx)
}
attr(my1, "smart") <- TRUE

转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。


注：
注1：为了方便大家学习，本文档为生物统计家园网机器人LoveR翻译而成，仅供个人R语言学习参考使用，生物统计家园保留版权。
注2：由于是机器人自动翻译，难免有不准确之处，使用时仔细对照中、英文内容进行反复理解，可以帮助R语言的学习。
注3：如遇到不准确之处，请在本贴的后面进行回帖，我们会逐渐进行修订。