Diag_JPH {lazy.symbolic} | R Documentation |
Diag(x) は、与えられたベクトルまたは行列から対角行列を生成します
Description
英語のヘルプファイルは: Diag
Arguments
x |
入力となる正方行列またはスカラー |
drop |
= 1 の場合、Diag(x) が 1 x 1 のときにスカラーを返します |
Details
Diag(x) は、次のような対角要素を持つ対角行列を返します:
1) x が行列の場合は、その対角要素
2) x がベクトル、行ベクトル、列ベクトルの場合は、その要素
文字行列に対しても使用可能です
Value
対角行列
Examples
Diag(demomat(2,2))
Diag(1:3)
Diag(matrix(1:3,1))
Diag(2)
Diag(demomat(2,2,root="a"))
Diag(diag(demomat(2,2,root="a")))
# 文字ベクトルから
Diag(paste("a",1:3,sep=""))
## Not run:
# 半記号的に分割された行列: SMdim 属性を持つスーパー行列
library(lazy.symbolic2)
A <- demomat(c(2,3),c(2,3),root="a")
Printb(A)
resA <- Diag(A)
Printb(resA)
resAB <- b_diag(A,demomat(2,2,root="b"),A)
Printb(resAB, sep=".")
# 完全に記号的な分割行列: SMdim 属性を持たず fullsymb 属性を持つ
Ap <- demomat(2,2,root="A", fullsymb=1)
Printb(Ap)
resAp <- Diag(Ap)
Printb(resAp)
resABp <- b_diag(Ap,demomat(2,2,root="b"),Ap)
Printb(resABp, sep=".")
## End(Not run)
[Package lazy.symbolic version 1.0.0.20250830 ]