R 기초_ 데이터 핸들링(2)

1. 데이터 일부 추출하기

# 1. 데이터 일부 추출하기
* 열 추출하기
* 행 추출하기

#  (1) 열 추출하기

•  열이 있는 위치로 추출하거나 열의 이름을 가지고 추출 가능

데이터명[    , 열의 위치or열의 이름]

•  여러 개의 경우

      - c( ) : 추출할 열들의 위치가 규칙이 없을 때 

      -  :   :  연달아 있는 경우에

      - seq( ) : 일정한 간격으로 떨어진 열을 추출할 때 

※ 열 추출의 최종 결과 값은 벡터(vector)이다. 

※ grep() 함수로 특정 문자를 포함한 열 이름을 추출 가능하다.

#  (2) 행 추출하기

• 행의 위치를 알거나 행의 이름을 알면 열 추출과 동일한 방법 사용

데이터명[ index , ]

• 비교 연산자나 논리 연산자를 이용하여 특정 조건을 만족하는 행만 추출

※ 조건(비교,논리)을 통해 특정 행만 추출 가능

 
[실습하기]
install.packages("ggplot2")
library(ggplot2)

# 1. 데이터의 내용 보기
#  (1) 데이터 전체 보기
diamonds
View(diamonds)

#  (2) 데이터 일부 보기
head(diamonds)
tail(diamonds)
head(diamonds, n=10)
tail(diamonds, n=10)

# 2. 데이터에서 일부 데이터 추출하기
#   (1) 열 추출하기
diamonds[ , 2]
diamonds[ , 2, drop=FALSE]
diamonds[ , c(2, 3, 7)]
diamonds[ , 7:10]
diamonds[ , seq(from=2, to=10, by=2)]      # 짝수 번째만 추출(일정한 간격)

diamonds[ , "cut"]
diamonds[ , "cut", drop=FALSE]
diamonds[ , c("cut", "price")]
diamonds[ , grep("^c", colnames(diamonds))]
diamonds[ , grep("c", colnames(diamonds))]
diamonds[ , grep("$c", colnames(diamonds))]

#   (2) 행 추출하기
diamonds[diamonds$cut == "Fair",  ]
diamonds[diamonds$price >= 18000,  ]
diamonds[diamonds$cut == "Fair" & diamonds$price >= 18000,  ]  

diamonds[diamonds$cut == "Fair"  | diamonds$price >= 18000,  ]

# & : 애퍼센드
# |  : 파이퍼, 버티컬 바