我想存储以下代码的输出。我尝试了列表,数据框和向量,但无法存储。
Model<-lda( y ~ Trend+Class+F1+F4+ATR+macd_signal+macd1+F5 ,data=x)
> Model
Call:
lda(y ~ Trend + Class + F1 + F4 + ATR + macd_signal + macd1 +
F5, data = x)
Prior probabilities of groups:
LOSS PROFIT
0.4981818 0.5018182
Group means:
TrendBull ClassUP F1 F4 ATR macd_signal macd1 F5
LOSS 0.5450122 0.3990268 1480.451 1481.672 11.64657 -0.0005850151 0.01542818 1478.567
PROFIT 0.5000000 0.4082126 1487.280 1486.707 12.25799 -0.0304256947 -0.03845741 1489.620
Coefficients of linear discriminants:
LD1
TrendBull -0.033267160
ClassUP 0.151291378
F1 -0.003215276
F4 -0.042431558
ATR 0.082615338
macd_signal 0.090182055
macd1 2.637216918
F5 0.045956343
> class(Model)
[1] "lda"
> typeof(Model)
[1] "list"
Run Code Online (Sandbox Code Playgroud)
关于如何存储它的任何想法?
您可以做的一件事是将模型输出保存在自己的文件中。R对象可以另存为rds文件。例如:
saveRDS(model, file = "your path/filename.rds")
Run Code Online (Sandbox Code Playgroud)
然后可以将对象加载到R环境中:
mod <- readRDS("your path/filename.rds")
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
889 次 |
| 最近记录: |