Я пытаюсь построить исторические данные форекс, используя пакет dygraphs R - используя функцию dyCandlestick.По какой-то причине R не находит функцию dyCandlestick, хотя пакет dygraphs загружен.
Я уже успешно запустил этот код, но я добавил несколько новых строк в то, что показано ниже, и теперь оно не работает,Я знаю, что tidyverse конфликтует с некоторыми функциями xts и lubridate, но я все равно не могу понять, как это сделать.
# historical Forex data obtained from:
#https://www.dukascopy.com/swiss/english/marketwatch/historical/
library(xts) # To make the convertion data-frame / xts format
library(lubridate)
library(dygraphs)
library(tidyverse)
raw_data <- read.csv("EURUSD_Candlestick_1_Hour_BID_01.01.2018-07.09.2019.csv") #data frame
i <- 1
time <- vector(length = nrow(raw_data))
for (when in raw_data$Local.time){
dtz <- strsplit(when, " ") #split date, time and GMT
when <- paste(dtz[[1]][1], dtz[[1]][2]) #use only date and time
datetime <- as.POSIXct(when, format = "%d.%m.%Y %H:%M:%OS")
time[i] <- strftime(datetime, "%d-%m-%Y %H:%M:%OS")
i<-i+1
}
#replace data with the new format
raw_data$Local.time <- NULL
raw_data$Local.time <- dmy_hms(time)
raw_data <- raw_data[c(1:77), ]
x = data.frame(raw_data$Open, raw_data$High, raw_data$Low, raw_data$Close)
#Candlestick charts use the first four data series to plot, the rest of the data series (if any) are rendered with line plotter
final_data <- xts(x = x, order.by = raw_data$Local.time)
dygraph(final_data) %>% dyCandlestick() #%>% dyOptions(sigFigs=5)
Как только я запускаю последнюю строку, я получаю это сообщение об ошибке: Ошибкав function_list [k]: не удалось найти функцию "dyCandlestick"
Любая помощь приветствуется!Кроме того, комментарии к другим частям кода, которые могли бы быть сделаны лучше, приветствуются - я немного новичок в R:)