私は非常に野心的な機能に取り組んできました。完成したら、私以外の人が使用できることを願っています。関数を使用するのが私だけの場合、出力が不自由になっても問題ありませんが、見栄えの良い出力が必要な場合はどうすればよいでしょうか? 私が探しているのは、本質的にこれです:
- コンソールに読み取り可能なものを出力する方法
- 印刷されたものにアクセスできること
より具体的には、出力したい 3 つのスカラー オブジェクトがあると仮定しましょう: stat
、dfree
およびpval
。現在、私がそれを行う方法は次のとおりです。
result <- list(statistic = stat, degrees = dfree, p.value = pval)
return(result)
そうすれば、たとえば実行することでこれらの値にアクセスできます(関数は呼び出されますwhites.htest
):
whites.htest$p.value
それは機能しますが、出力はちょっと醜いです。
> whites.htest(var.modell)
$statistic
[1] 36.47768
$degrees
[1] 30
$p.value
[1] 0.1928523
次のような単純な VAR モデルを実行すると:
> library(vars)
> data <- matrix(rnorm(200), ncol = 2)
> VAR(data, p = 2, type = "trend")
VAR Estimation Results:
=======================
Estimated coefficients for equation y1:
=======================================
Call:
y1 = y1.l1 + y2.l1 + y1.l2 + y2.l2 + trend
y1.l1 y2.l1 y1.l2 y2.l2 trend
-0.090102007 -0.060138062 0.126250484 0.014423006 0.003138521
Estimated coefficients for equation y2:
=======================================
Call:
y2 = y1.l1 + y2.l1 + y1.l2 + y2.l2 + trend
y1.l1 y2.l1 y1.l2 y2.l2 trend
0.040118527 0.018274399 -0.132943318 -0.031235939 0.003242241
出力は非常によく見えます。その基礎となるコードを(単に実行してVAR
)見てきましたが、このように見える理由がわかりません。
だから私の質問は、関数から個々のオブジェクト (つまり結果) にアクセスしながら、コンソールに読みやすいものを出力するにはどうすればよいかということです。