## 데이터 불러오기
# R 자체 있는 데이터셋 가져오기
# See the data already we have
help(package='datasets') # see the list of dataset R has
data() # see the list of data currently loaded from current environment
data(package='ggplot2') # see the list of dataset in the package named ggplot2
# readxl 패캐지 설치 및 라이브러리 불러오기
install.packages("readxl")
library(readxl)
# 데이터 경로 설정
setwd("/Users/seohyeonjeong/workspaceR/HelloR-master")
# Excel file 불러오기 : read_excel()
# header설정이 default
excel_data_ex <- read_excel("./Data/data_ex.xls") # data_ex.xls파일을 excel_data_ex로 저장
View(excel_data_ex) # 데이터 조회
# 엑셀 파일 불러올 때 기본 값으로 첫번째 시트의 데이터 가져옴. 다른 시트 데이터 가져오려면 시트지정 : sheet=
excel_data_ex2 <- read_excel("C:/Users/sjeong/Documents/R/workingdirectory/source/data_ex.xls", sheet=2)
# TXT 파일 불러오기 : read.table()
# default delimiter = (tab), 그 외엔 sep="(delimiter)"로 지정
ex_data1 <- read.table("./Data/data_ex.txt", header = TRUE)
View(ex_data1)
# 지정된 행부터 데이터 가져오기 : skip=
ex_data2 <- read.table("./Data/data_ex.txt", header = TRUE, skip=3)
View(ex_data2)
# 원하는 개수만큼 데이터 가져오기 : nrow=
ex_data3 <- read.table("./Data/data_ex.txt", header = TRUE, nrow=7)
View(ex_data3)
# 변수명을 추가하여 가져오기 : col.names=
varname <- c("ID", "SEX", "AGE", "AREA")
ex2_data <- read.table("./Data/data_ex2.txt", sep=",", col.names = varname)
View(ex2_data)
## 데이터 저장하기
# RDA 파일 : R 전용 파일
# RDA 파일로 저장하기
save(data_ex, file="data_ex.rda")
# RDA 파일 불러오기
load("C:/Users/sjeong/Documents/R/workingdirectory/source/data_ex.rda")
View(data_ex)
# 사용성 높은 CSV 또는 TXT파일로 저장하기
write.csv(data_ex, file="C:/Users/sjeong/Documents/R/workingdirectory/source/data_ex.csv")
write.table(data_ex, file="C:/Users/sjeong/Documents/R/workingdirectory/source/data_ex.txt")
# quote=FALSE 옵션을 추가하면 데이터 값에 큰따옴표 없이 저장가능