In Ari1225/tqk: Get Financial data in korea with tidyquant package

knitr::opts_chunk$set(echo = TRUE)

tqk

스타는 더욱 많은 코드, 데이터 공개의 힘이 됩니다. ;)

MIT 라이선스는 마음껏 쓰되, 출처를 표시해달라는 뜻입니다.

사용하실 때 출처(링크 표기 가능)를 밝혀주시면 감사하겠습니다.

문의는 이슈로 남겨주세요.

이슈로 남겨주시면 같은 문제를 겪는 분이 해결하는데 도움이 됩니다.

사용 설명서

tidyquant의 설명서 일부를 번역하고 tqk를 적용하여 한국 주식을 예로 든 문서를 준비 했습니다.

사용 설명서 바로가기

tidyquant에서 한국 주가 정보 활용

tidyquant가 활용하는 yahoo나 google 주식은 한국 주식 데이터가 유명한 것만 있어 주식 분석을 하는데 문제가 있습니다. 그래서 우리나라에서 대표적으로 주식 데이터를 제공하는 p, n, d 사등의 페이지를 가져오는 함수를 작성하여 배포합니다.(현재 p사만 적용중)

기능

1. code_get : 우리나라 주식시장의 code와 명칭, 소속 시장 정보를 가져옵니다.
2. tqk_get : code와 날짜를 기반으로 주식 정보를 가져옵니다. tidyquant 의 양식이 기본값이고 가져오는 데이터 형식 전체를 사용하고 싶으면 tqform=F 설정하시면 됩니다. tqform=T 일때 adjusted는 아직 close와 같은 값으로 계산식을 업데이트 해야 합니다.

사용법

library(tqk)
code <- code_get()
code
sscode <- code[grep("^삼성전자$", code$name),1]
sscode
samsung <- tqk_get(sscode, from="2018-05-01")
samsung

파이프 (%>%) 사용 with dplyr

library(tqk)
library(dplyr)
code_get() %>% 
  filter(grepl("^삼성전자$", name)) %>% 
  select(code) %>% 
  tqk_get(from = "2018-05-01") -> ss
ss

설치

if (!requireNamespace("remotes")) install.packages("remotes")
remotes::install_github("mrchypark/tqk")
library(tqk)

Ari1225/tqk documentation built on May 25, 2019, 9:22 a.m.