Saving time - II
미래에 사용할 수 있도록 flights_xts 데이터를 rds 파일로 저장해 두었어요. 그런데 R을 사용하지 않는 동료와 이 데이터를 공유하려면 어떻게 할까요?
xts 객체를 저장하는 두 번째 방법은 R 환경 밖에서도 공유 가능한 형식(예: 쉼표로 구분된 값, CSV 파일)으로 변환하는 거예요. 이를 위해 write.zoo() 명령을 사용해요.
xts 객체를 csv 파일로 성공적으로 내보냈다면, read.zoo() 명령으로 다시 R에 불러올 수 있어요. 하지만 readRDS와 달리, 불러온 데이터를 xts 객체로 다시 인코딩해야 해요(as.xts 사용).
이 연습은 강의의 일부입니다
사례 연구: R로 도시 시계열 데이터 분석
연습 안내
write.zoo()를 사용해flights_xts데이터를"flights_xts.csv"로 저장하세요.sep인수에 쉼표 구분자(",")를 지정해야 해요.read.zoo()를 사용해 파일을 R로 다시 읽어오세요. 내보낸 파일 이름과 데이터를 구분한 방법을 지정하세요. 다른 인수들도 살펴보되 코드는 변경하지 마세요. 이 새 객체를flights2로 저장하세요.as.xts()를 사용해flights2객체를 다시 xts로 인코딩하세요. 새 xts 객체를flights_xts2로 저장하세요.
실습형 인터랙티브 연습
이 예제를 이 샘플 코드를 완성하여 풀어보세요.
# Export your xts object to a csv file using write.zoo
write.zoo(flights_xts, file = "___", sep = "___")
# Open your saved object using read.zoo
flights2 <- read.zoo("___", sep = "___", FUN = as.Date, header = TRUE, index.column = 1)
# Encode your new object back into xts
flights_xts2 <- as.xts(___)
# Examine the first five rows of your new flights_xts2 object