Thiết lập đối số mặc định theo từng mã

Nhập và quản lý dữ liệu tài chính trong R

Joshua Ulrich

Quantitative Analyst & quantmod Co-Author and Maintainer

Dùng setSymbolLookup() để chọn nguồn dữ liệu

setSymbolLookup(AAPL = "google")

aapl <- getSymbols("AAPL", auto.assign = FALSE)
str(aapl)  # lưu ý thuộc tính 'src'

Đối tượng ‘xts’ trên 2007-01-03/2017-02-22 gồm:
  Dữ liệu: num [1:2552, 1:5] 12.3 12 12.2 12.3 12.3 ...
 - attr(*, "dimnames")=Danh sách 2 phần tử
  ..$ : NULL
  ..$ : chr [1:5] "AAPL.Open" "AAPL.High" "AAPL.Low" "AAPL.Close" ...
  Đánh chỉ mục bởi đối tượng lớp: [Date] TZ: UTC
  Thuộc tính xts:  
Danh sách 2
 $ src    : chr "google"
 $ updated: POSIXct[1:1], format: "2017-02-23 14:16:55"

Dùng setSymbolLookup() cho các đối số khác

setSymbolLookup(MSFT = list(src = "google", from = "2016-01-01"))

msft <- getSymbols("MSFT", auto.assign = FALSE)
str(msft)  # lưu ý thuộc tính 'src' và ngày đầu tiên

Đối tượng ‘xts’ trên 2016-01-04/2017-02-27 gồm:
  Dữ liệu: num [1:290, 1:5] 54.3 54.9 54.3 52.7 52.4 ...
 - attr(*, "dimnames")=Danh sách 2 phần tử
  ..$ : NULL
  ..$ : chr [1:5] "MSFT.Open" "MSFT.High" "MSFT.Low" "MSFT.Close" ...
  Đánh chỉ mục bởi đối tượng lớp: [Date] TZ: UTC
  Thuộc tính xts:  
Danh sách 2
 $ src    : chr "google"
 $ updated: POSIXct[1:1], format: "2017-02-23 14:20:21"

Lưu và khôi phục mặc định (1)

# Đặt mặc định
setSymbolLookup(AAPL = "google")

# Kiểm tra mặc định đã đổi
getSymbolLookup()

$AAPL
$AAPL$src
"google"

# Lưu cấu hình tra cứu
saveSymbolLookup("symbol_lookup.rda")

# Xóa cấu hình tra cứu
setSymbolLookup(AAPL = NULL)

Lưu và khôi phục mặc định (2)

# Kiểm tra mặc định đã bị xóa
getSymbolLookup()

named list()

# Tải cấu hình tra cứu
loadSymbolLookup("symbol_lookup.rda")

# Kiểm tra mặc định đã khôi phục
getSymbolLookup()

$AAPL
$AAPL$src
"google"

Hãy luyện tập!

Nhập và quản lý dữ liệu tài chính trong R