(R1)제03강(3.2) 행렬 연산 하기 - 행렬 +/-, 기술통계량, apply 사용하기

1. 행렬 더하기, 빼기 등

m1 <- matrix(c(1,2,3,4,5,6),nrow=2,byrow=T);m1

m100 <- matrix(c(100,200,300,400,500,600),nrow=2,byrow=T);m100

m1+3 #

m1*3 #

m1+m100 #

m1-m100 #

m1*m100 # element product

m1 %*% t(m1) # (2 by 3) X (3 by 2)

m1/m100 #

 

m22 <- matrix(c(100,200,300,400),nrow=2,byrow=T);m22

 

mp22 <- m1+m22; mp22 # 차원다른 행렬더하기, 당연 에러

 

 

2. 행렬의 기술통계량 구하기 – colsum( ), rowsum( )

 

(1) colsum, rowsum

 

m1 <- matrix(c(1,2,3,4,5,6),nrow=2,byrow=T);m1

m100 <- matrix(c(100,200,300,400,500,600),nrow=2,byrow=T);m100

 

colSUm rowsum

 

3.  apply 사용하기

 

데이터에서 집계를 하는 함수로 행렬에서 행 또는 열 단위로 작업을 하고자 할 때 사용되는 함수입니다.

 

apply(x,MARGIN,FUN,...)

 

apply(x, 1 또는 2, 함수이름)

x: 행렬

1: 행, 2: 열

 

apply(m1,1,sum) 행렬 m1 에 대하여 행단위로 합계를 구한다

apply(m1,2,sum) 행렬 m1 에 대하여 열단위로 합계를 구한다

apply(m1,1,min) 행렬 m1 에 대하여 열단위로 최소값를 구한다

apply(m1,1,max) 행렬 m1 에 대하여 열단위로 최대값를 구한다

apply(m1,1,mean) 행렬 m1 에 대하여 열단위로 평균값을 구한다

apply(m1,1,range) 행렬 m1 에 대하여 열단위로 범위를 구한다

apply(m1,1,quartile) 행렬 m1 에 대하여 열단위로 사분위수를 구한다

apply(m1,1,prod) 행렬 m1 에 대하여 열단위로 곱을 구한다

 

apply 함수는 배열이나 행렬의 주변(marginal) 의 값을 계산하는 함수입니다.

 

apply(X, MARGIN,. FUN, ...)

 

x : 적용시킬 배열이나 행렬객체

MARGIN : 적용시킬 주변값을 기술하는 벡터, (1) 행 (2) 열, c(1,2) : 행렬을 나타낸다.