가장 간단한 SAS, R, Python 프로그램

변수 성별(gender), 몸무게(wei), 키(hei), 나이(age), 입사일자(join) 을 읽고 프린트하는 간단한 프로그램입니다.

 

[SAS 프로그램]

DATA a1;
INPUT gender $ wei hei age join $;
CARDS;
F 65 171 23 2002-01-23
F 66 172 24 2002-02-28
F 69 176 38 2003-01-23
M 67 173 43 2003-05-05 
M 68 177 40 2004-03-31
M 72 178 42 2004-06-24

F 65 171 23 2002-01-23
F 66 172 24 2002-02-28
F 69 176 38 2003-01-23
M 67 173 43 2003-05-05 
M 68 177 40 2004-03-31
M 72 178 42 2004-06-24

;
PROC PRINT;
VAR gender wei hei age join;
RUN;       

 

[R 프로그램]

# 간단한 R 프로그램 01_simple.R
(wei <- c( 65, 66, 69, 67, 68, 72,65, 66, 69, 67, 68, 72))
(hei <- c(171,172,176,173,177,178,171,172,176,173,177,178))
(age <- c(23,24,38,43,40,42,23,24,38,43,40,42))
join <- c("2002-01-23","2002-02-28","2003-01-23","2003-05-05","2004-03-31",
          "2004-06-24","2002-01-23","2002-02-28","2003-01-23","2003-05-05","2004-03-31",
          "2004-06-24")
a1 <- data.frame(wei,hei,age,join)
a1 # 또는 print(a1)

head(a1)  # 앞에서 6개만 프린트

tail(a1) # 뒷부분 6개 프린트

head(a1,n=5) # 앞부분 5개만 프린트

 

[Python 프로그램]

# Pandas 불러오기

import pandas as pd 

# 딕셔너리로 데이터 입력

dict01 = {'wei': [65, 66, 69, 67, 68, 72,65, 66, 69, 67, 68, 72],

'hei': [171,172,176,173,177,178,171,172,176,173,177,178],

'age': [23,24,38,43,40,42,23,24,38,43,40,42]}

# 딕셔너리를 데이터프레임으로 변환

a1=pd.DataFrame(dict01)

# head 매소드를 이용하여 5개의 관측치를 출력
a1.head()

a1.tail()