行列の積の vec を vec 演算子と Kronecker 積で変換

Description

英語のヘルプファイルは: vec2vecK

Arguments

Details

この関数は vec(A%*%B%*%C) を (t(C)%@%A) %*% vec(B) に変換します。

入力行列は数値、準シンボリック、または完全シンボリックであることが可能です。

入力行列が3つ未満の場合、単位行列 I を設定することで 様々な結果を得ることができます。

Value

変換結果としての式を返します。

Examples

# 完全シンボリックな結果
# 一般形
vec2vecK( "A","B","C")

# 2つの行列の場合
vec2vecK( "A","B")
vec2vecK( "A",,"B")
vec2vecK( ,"A","B")

## Not run: 
# 準シンボリック行列で確認
A <- demomat(2,2,root="a")
B <- demomat(2,2,root="b")
C <- demomat(2,2,root="c")

# 一般形
res1 <- vec(A%*%B%*%C)
res2 <- vec2vecK(A, B, C)

# 2つの行列の場合
v0 <- vec(A%*%B)
v1 <- vec2vecK( A, B, diag(2) )
v2 <- vec2vecK( A, diag(2), B )
v3 <- vec2vecK( diag(2), A, B )
Print(v0,v1,v2,v3)

## End(Not run)