(S1)제12강(1.1) SAS에서 R 실행하기

좀 이상한 개념이긴 한데, SAS에서 R 코드를 실행하는 방법을 설명합니다.

SAS/IML 의 예제를 R로 실행해 보겠습니다.

SAS에서 R을 쓰지 말고 그냥 R을 쓰면 되지, 구태어 SAS 환경에서 R을 쓸 필요가 있나요? 물으시면

"제 말이 바로 그 말입니다"

그런데 SAS에 익숙하신 분들은, 또는 업무상 SAS 프로그램내에서 R을 구현할 수 있으면

엄청 편리한 부분도 있을 수 있을 것이라는 생각도 듭니다.

 

PROC OPTIONS OPTION=RLANG;

RUN;

 

.... RLANG Enables SAS to execute R language statements

 

PROC IML;

SUBMIT / R;     # R 프로그램의 시작

vec01 <- c(100,200,300,400,500)

vec01[3]

vec01[2:4]

vec01[c(1,3)]

vec01[vec01 <= 300] # 100,200,300

vec01[c(T,T,T,F,F)] # 100 200 300

ENDSUBMIT;     # R 프로그램의 끝

 

 

PROC IML;

/* Comparison of matrix operations in IML and R */

print "---------- SAS/IML Results -----------------";

x = 1:3; /* vector of sequence 1,2,3 */

m = {1 2 3, 4 5 6, 7 8 9}; /* 3 x 3 matrix */

q = m * t(x); /* matrix multiplication */

print q;

print "------------- R Results --------------------";

submit / R;

rx <- matrix( 1:3, nrow=1) # vector of sequence 1,2,3

rm <- matrix( 1:9, nrow=3, byrow=TRUE) # 3 x 3 matrix

rq <- rm %*% t(rx) # matrix multiplication

print(rq)

endsubmit;