The goal of ubci is to get UBCI(UpBit Crypto Index) & Crypto price data form upbit.
ubci is now on cran!
You can install on cran with:
install.packages("ubci")
You can install the development version of ubci from GitHub with:
install.packages("remotes")
remotes::install_github("mrchypark/ubci")
please check encoding UTF-8 for unix-like os.
Sys.getlocale()
#> [1] "LC_COLLATE=Korean_Korea.949;LC_CTYPE=Korean_Korea.949;LC_MONETARY=Korean_Korea.949;LC_NUMERIC=C;LC_TIME=Korean_Korea.949"
ubci_index_options()
function return list of index code &
descriptions.
library(ubci)
ubci_index_options()
#> # A tibble: 26 x 4
#> index name cate smry
#> <chr> <chr> <chr> <chr>
#> 1 UBMI UBMI(Upbit Market~ Market I~ It is calculated for all cryptocur~
#> 2 UBMI_ST UBMI BTC quote(Up~ Market I~ It is the index that is converted ~
#> 3 UBAI UBAI(Upbit Altcoi~ Market I~ It is calculated for all cryptocur~
#> 4 UBAI_ST UBAI BTC quote(Up~ Market I~ It is the index that is converted ~
#> 5 UTTI UBMI 10(Upbit Top~ Market I~ It is an index that comprises the ~
#> 6 UTHI UBMI 30(Upbit Top~ Market I~ It is an index that comprises the ~
#> 7 THMIDX~ Value Preservatio~ Theme In~ ""
#> 8 THMIDX~ Simple Settlement~ Theme In~ ""
#> 9 THMIDX~ Game Theme In~ ""
#> 10 THMIDX~ Advertisement Ind~ Theme In~ ""
#> # ... with 16 more rows
ubci_index_options()
function provide lang param for korean
descriptions.
ubci_index_options(lang="ko")
#> # A tibble: 26 x 4
#> index name cate smry
#> <chr> <chr> <chr> <chr>
#> 1 UBMI UBMI(Upbit Market ~ 시장 인덱스~ 업비트 거래소에 상장된 모든 암호화폐를 대상으로 산출한 인덱스~
#> 2 UBMI_ST UBMI BTC quote(Upb~ 시장 인덱스~ UBMI 인덱스를 비트코인 기준으로 환산한 인덱스~
#> 3 UBAI UBAI(Upbit Altcoin~ 시장 인덱스~ 업비트 거래소에 상장된 모든 암호화폐에서 비트코인을 제외한 인~
#> 4 UBAI_ST UBAI BTC quote(Upb~ 시장 인덱스~ UBAI 인덱스를 비트코인 기준으로 환산한 인덱스~
#> 5 UTTI UBMI 10(Upbit Top ~ 시장 인덱스~ 업비트에 상장된 암호화폐 중, 시가총액 상위 10개 종목으로 ~
#> 6 UTHI UBMI 30(Upbit Top ~ 시장 인덱스~ 업비트에 상장된 암호화폐 중, 시가총액 상위 30개 종목으로 ~
#> 7 THMIDX~ 가치보존 및 바스켓 테마 인덱스~ 다른 자산으로 구성된 바스켓을 보유하고 있거나, 연동을 통해 ~
#> 8 THMIDX~ 간편결제 플랫폼 테마 인덱스~ 온라인 자산과 암호화폐를 기반으로 한 결제 솔루션을 제공하는 ~
#> 9 THMIDX~ 게임시장 테마 인덱스~ 게임 산업과 연관되거나, 게임 내/게임 간의 가치 교환에 사용~
#> 10 THMIDX~ 광고산업 테마 인덱스~ 다양한 형태의 광고와 관련된 서비스를 제공하는 암호화폐로 구성~
#> # ... with 16 more rows
ubci_index()
function return index data with code, range of date with
from/to.
loi<-ubci_index_options()
loi$index[1]
#> [1] "UBMI"
ubci_index(loi$index[1])
#> # A tibble: 400 x 6
#> index date open high low close
#> <chr> <date> <dbl> <dbl> <dbl> <dbl>
#> 1 UBMI 2019-06-10 1607. 1664. 1574. 1646.
#> 2 UBMI 2019-06-09 1660. 1666. 1588. 1606.
#> 3 UBMI 2019-06-08 1668. 1680. 1636. 1658.
#> 4 UBMI 2019-06-07 1629. 1682. 1608. 1667.
#> 5 UBMI 2019-06-06 1634. 1644. 1565. 1627.
#> 6 UBMI 2019-06-05 1620. 1670. 1586. 1634.
#> 7 UBMI 2019-06-04 1694. 1706. 1571. 1618.
#> 8 UBMI 2019-06-03 1782. 1790. 1696. 1696.
#> 9 UBMI 2019-06-02 1753. 1796. 1751. 1781.
#> 10 UBMI 2019-06-01 1770. 1776. 1737. 1753.
#> # ... with 390 more rows
tail(ubci_index(loi$index[1], from="2019-05-15"))
#> # A tibble: 6 x 6
#> index date open high low close
#> <chr> <date> <dbl> <dbl> <dbl> <dbl>
#> 1 UBMI 2019-05-20 1621. 1621. 1530. 1594.
#> 2 UBMI 2019-05-19 1479. 1638. 1478. 1621.
#> 3 UBMI 2019-05-18 1504. 1552. 1464. 1480.
#> 4 UBMI 2019-05-17 1602. 1622. 1404. 1503.
#> 5 UBMI 2019-05-16 1612. 1684. 1541. 1602.
#> 6 UBMI 2019-05-15 1541. 1623. 1514. 1612.
ubci_index(loi$index[1], to="2019-05-15")
#> # A tibble: 374 x 6
#> index date open high low close
#> <chr> <date> <dbl> <dbl> <dbl> <dbl>
#> 1 UBMI 2019-05-15 1541. 1623. 1514. 1612.
#> 2 UBMI 2019-05-14 1450. 1576. 1443. 1540.
#> 3 UBMI 2019-05-13 1316. 1490. 1303. 1450.
#> 4 UBMI 2019-05-12 1347. 1413. 1282. 1316.
#> 5 UBMI 2019-05-11 1213. 1388. 1213. 1348.
#> 6 UBMI 2019-05-10 1183. 1224. 1173. 1214.
#> 7 UBMI 2019-05-09 1150. 1187. 1150. 1183.
#> 8 UBMI 2019-05-08 1124. 1153. 1111. 1151.
#> 9 UBMI 2019-05-07 1118. 1159. 1118. 1124.
#> 10 UBMI 2019-05-06 1121. 1128. 1098. 1117.
#> # ... with 364 more rows
ubci_index(loi$index[1], from="2019-05-10", to="2019-05-15")
#> # A tibble: 6 x 6
#> index date open high low close
#> <chr> <date> <dbl> <dbl> <dbl> <dbl>
#> 1 UBMI 2019-05-15 1541. 1623. 1514. 1612.
#> 2 UBMI 2019-05-14 1450. 1576. 1443. 1540.
#> 3 UBMI 2019-05-13 1316. 1490. 1303. 1450.
#> 4 UBMI 2019-05-12 1347. 1413. 1282. 1316.
#> 5 UBMI 2019-05-11 1213. 1388. 1213. 1348.
#> 6 UBMI 2019-05-10 1183. 1224. 1173. 1214.
ubci_get_options()
function return list of crypto code & name.
ubci_get_options()
#> # A tibble: 513 x 5
#> code name exchange tradeStatus marketState
#> <chr> <chr> <chr> <chr> <chr>
#> 1 UPBIT.KRW-BTC Bitcoin UPBIT ACTIVE ACTIVE
#> 2 UPBIT.KRW-DASH Dash UPBIT PREVIEW ACTIVE
#> 3 UPBIT.KRW-ETH Ethereum UPBIT PREVIEW ACTIVE
#> 4 UPBIT.BTC-NEO NEO UPBIT DELISTED DELISTED
#> 5 UPBIT.BTC-ETH Ethereum UPBIT ACTIVE ACTIVE
#> 6 UPBIT.BTC-LTC Litecoin UPBIT ACTIVE ACTIVE
#> 7 UPBIT.BTC-STRAT Stratis UPBIT ACTIVE ACTIVE
#> 8 UPBIT.BTC-XRP Ripple UPBIT ACTIVE ACTIVE
#> 9 UPBIT.BTC-ETC Ethereum Classic UPBIT ACTIVE ACTIVE
#> 10 UPBIT.BTC-OMG OmiseGo UPBIT ACTIVE ACTIVE
#> # ... with 503 more rows
ubci_get_options()
function provide lang param for korean name of
crypto.
ubci_get_options(lang="ko")
#> # A tibble: 513 x 5
#> code name exchange tradeStatus marketState
#> <chr> <chr> <chr> <chr> <chr>
#> 1 UPBIT.KRW-BTC 비트코인 UPBIT ACTIVE ACTIVE
#> 2 UPBIT.KRW-DASH 대시 UPBIT PREVIEW ACTIVE
#> 3 UPBIT.KRW-ETH 이더리움 UPBIT PREVIEW ACTIVE
#> 4 UPBIT.BTC-NEO 네오 UPBIT DELISTED DELISTED
#> 5 UPBIT.BTC-ETH 이더리움 UPBIT ACTIVE ACTIVE
#> 6 UPBIT.BTC-LTC 라이트코인 UPBIT ACTIVE ACTIVE
#> 7 UPBIT.BTC-STRAT 스트라티스 UPBIT ACTIVE ACTIVE
#> 8 UPBIT.BTC-XRP 리플 UPBIT ACTIVE ACTIVE
#> 9 UPBIT.BTC-ETC 이더리움클래식 UPBIT ACTIVE ACTIVE
#> 10 UPBIT.BTC-OMG 오미세고 UPBIT ACTIVE ACTIVE
#> # ... with 503 more rows
ubci_get()
function return crypto prcie data with code, range of date
with from/to.
loc<-ubci_get_options()
loc$code[1]
#> [1] "UPBIT.KRW-BTC"
ubci_get(loc$code[1])
#> # A tibble: 400 x 7
#> code date open high low close volume
#> <chr> <date> <dbl> <dbl> <dbl> <dbl> <dbl>
#> 1 UPBIT.KRW-BTC 2019-06-10 9477000 9789000 9284000 9673000 6076.
#> 2 UPBIT.KRW-BTC 2019-06-09 9745000 9784000 9381000 9474000 5373.
#> 3 UPBIT.KRW-BTC 2019-06-08 9751000 9825000 9601000 9733000 4780.
#> 4 UPBIT.KRW-BTC 2019-06-07 9495000 9830000 9388000 9749000 7876.
#> 5 UPBIT.KRW-BTC 2019-06-06 9583000 9644000 9172000 9495000 6690.
#> 6 UPBIT.KRW-BTC 2019-06-05 9487000 9826000 9326000 9583000 11686.
#> 7 UPBIT.KRW-BTC 2019-06-04 9999000 10017000 9230000 9486000 13615.
#> 8 UPBIT.KRW-BTC 2019-06-03 10505000 10509000 9990000 9999000 8906.
#> 9 UPBIT.KRW-BTC 2019-06-02 10350000 10599000 10340000 10505000 6869.
#> 10 UPBIT.KRW-BTC 2019-06-01 10383000 10400000 10228000 10350000 5515.
#> # ... with 390 more rows
tail(ubci_get(loc$code[1], from="2019-05-15"))
#> # A tibble: 6 x 7
#> code date open high low close volume
#> <chr> <date> <dbl> <dbl> <dbl> <dbl> <dbl>
#> 1 UPBIT.KRW-BTC 2019-05-20 9712000 9713000 9200000 9581000 11458.
#> 2 UPBIT.KRW-BTC 2019-05-19 8819000 9809000 8810000 9712000 16388.
#> 3 UPBIT.KRW-BTC 2019-05-18 8891000 9232000 8684000 8823000 11615.
#> 4 UPBIT.KRW-BTC 2019-05-17 9465000 9557000 8360000 8891000 22071.
#> 5 UPBIT.KRW-BTC 2019-05-16 9606000 9842000 9247000 9465000 17057.
#> 6 UPBIT.KRW-BTC 2019-05-15 9499000 9757000 9220000 9606000 17857.
ubci_get(loc$code[1], to="2019-05-15")
#> # A tibble: 374 x 7
#> code date open high low close volume
#> <chr> <date> <dbl> <dbl> <dbl> <dbl> <dbl>
#> 1 UPBIT.KRW-BTC 2019-05-15 9499000 9757000 9220000 9606000 17857.
#> 2 UPBIT.KRW-BTC 2019-05-14 9235000 9907000 9100000 9499000 25056.
#> 3 UPBIT.KRW-BTC 2019-05-13 8166000 9518000 8064000 9230000 26619.
#> 4 UPBIT.KRW-BTC 2019-05-12 8370000 8807000 7950000 8170000 21060.
#> 5 UPBIT.KRW-BTC 2019-05-11 7495000 8551000 7491000 8368000 24016.
#> 6 UPBIT.KRW-BTC 2019-05-10 7272000 7588000 7228000 7495000 10597.
#> 7 UPBIT.KRW-BTC 2019-05-09 6952000 7299000 6943000 7273000 9562.
#> 8 UPBIT.KRW-BTC 2019-05-08 6752000 6959000 6670000 6959000 5646.
#> 9 UPBIT.KRW-BTC 2019-05-07 6620000 6930000 6618000 6753000 7376.
#> 10 UPBIT.KRW-BTC 2019-05-06 6703000 6712000 6573000 6620000 3957.
#> # ... with 364 more rows
ubci_get(loc$code[1], from="2019-05-10", to="2019-05-15")
#> # A tibble: 6 x 7
#> code date open high low close volume
#> <chr> <date> <dbl> <dbl> <dbl> <dbl> <dbl>
#> 1 UPBIT.KRW-BTC 2019-05-15 9499000 9757000 9220000 9606000 17857.
#> 2 UPBIT.KRW-BTC 2019-05-14 9235000 9907000 9100000 9499000 25056.
#> 3 UPBIT.KRW-BTC 2019-05-13 8166000 9518000 8064000 9230000 26619.
#> 4 UPBIT.KRW-BTC 2019-05-12 8370000 8807000 7950000 8170000 21060.
#> 5 UPBIT.KRW-BTC 2019-05-11 7495000 8551000 7491000 8368000 24016.
#> 6 UPBIT.KRW-BTC 2019-05-10 7272000 7588000 7228000 7495000 10597.
Session info is below.
sessionInfo()
#> R version 3.5.3 (2019-03-11)
#> Platform: x86_64-w64-mingw32/x64 (64-bit)
#> Running under: Windows 10 x64 (build 18362)
#>
#> Matrix products: default
#>
#> locale:
#> [1] LC_COLLATE=Korean_Korea.949 LC_CTYPE=Korean_Korea.949
#> [3] LC_MONETARY=Korean_Korea.949 LC_NUMERIC=C
#> [5] LC_TIME=Korean_Korea.949
#>
#> attached base packages:
#> [1] stats graphics grDevices utils datasets methods base
#>
#> other attached packages:
#> [1] ubci_0.0.3
#>
#> loaded via a namespace (and not attached):
#> [1] Rcpp_1.0.1 knitr_1.23 magrittr_1.5 tidyselect_0.2.5
#> [5] R6_2.4.0 rlang_0.3.4 fansi_0.4.0 stringr_1.4.0
#> [9] httr_1.4.0 dplyr_0.8.1 tools_3.5.3 xfun_0.7
#> [13] utf8_1.1.4 cli_1.1.0 htmltools_0.3.6 yaml_2.2.0
#> [17] assertthat_0.2.1 digest_0.6.19 tibble_2.1.3 crayon_1.3.4
#> [21] purrr_0.3.2 tidyr_0.8.3 vctrs_0.1.0 zeallot_0.1.0
#> [25] curl_3.3 glue_1.3.1 evaluate_0.14 rmarkdown_1.13
#> [29] stringi_1.4.3 compiler_3.5.3 pillar_1.4.1 backports_1.1.4
#> [33] jsonlite_1.6 lubridate_1.7.4 pkgconfig_2.0.2
Data source license is below.
“UBCI 인덱스”
Copyright 2018 두나무(주) All rights reserved.
Powered by 두나무/Upbit
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.