구도블로그

안녕하세요 구도입니다.

오늘은 R자체에 내장된 데이터 셋을 읽는 방법과 외부 파일을 읽는 방법에 대한 코드를 정리해보았습니다.

*프로그램은 'R x64 3.5.1' 을 사용하였습니다*

#R데이터 읽기 및 외부 데이터 파일 읽기

write.table(quakes, file="C://Users//user//Desktop//mydata1.txt", sep=",") # 데이터 간 구분자는 쉼표(구분자를 탭으로 지정하려면 sep="\t")

my1<- read.table("C://Users//user//Desktop//mydata1.txt", sep=",", header=T)

my1

(*주황색으로 표시한 곳은 각 개별 파일 경로를 복사 붙여넣기 하면 끝이랍니다)

write.table(quakes, file="C://Users//user//Desktop//quakes.csv", sep=",")

write.table(quakes, file="C://Users//user//Desktop//quakes1.csv", sep=",", row.name=FALSE)

my2<- read.csv("C://Users//user//Desktop//quakes.csv", header=T)

my3<- read.csv("C://Users//user//Desktop//quakes1.csv", sep=",", header=T)

write.csv(quakes, file="C://Users//user//Desktop//quakes2.csv")

my4<- read.csv("C://Users//user//Desktop//quakes2.csv", header=TRUE)

#작업공간 설정

setwd() #작업공간 설정

getwd() #작업공간 확인

getwd()   #현재 작업공간 위치 확인

setwd("C://Big")  # 슬래시(/)와 역슬래시(\)는 구분됨. 슬래시(/)와 역슬래시 두개(\\)는 같은 의미. 

getwd()

write.table(quakes, file="C://Big//mydata1.txt", sep=",") # 데이터 간 구분자는 쉼표(구분자를 탭으로 지정하려면 sep="\t")

my1<- read.table("mydata1.txt", header=T)

my1

url <- "http://vincentarelbundock.github.io/Rdatasets/csv/datasets/Titanic.csv"

x <- read.csv(url)

x

#지난 주제 복습

install.packages("graphics")

library(graphics)

x <- c(9,15,20,6)   # 영업 실적 할당

label <- c("영업 1팀", "영업 2팀", "영업 3팀", "영업 4팀")     # 부서명 할당

pie(x,labels=label)

오늘은 내용이 짧네요 ㅎㅎ

그래도 빅데이터를 분석하는데 중요한 코드들이니 열심히 공부하시면 큰 도움이 되실꺼라 믿습니다.

오늘도 글 읽어주셔서 감사합니다.