The data is taken from "Bitcoin Historical Data" Kaggle Dataset (available at https://www.kaggle.com/mczielinski/bitcoin-historical-data).
## Warning: package 'plotly' was built under R version 3.4.3
## # A tibble: 6 x 8
## Timestamp Open High Low Close `Volume_(BTC)` `Volume_(Currency)`
## <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
## 1 1410915060 NaN NaN NaN NaN NaN NaN
## 2 1449377100 NaN NaN NaN NaN NaN NaN
## 3 1398214140 NaN NaN NaN NaN NaN NaN
## 4 1485453060 NaN NaN NaN NaN NaN NaN
## 5 1465594440 NaN NaN NaN NaN NaN NaN
## 6 1431082500 NaN NaN NaN NaN NaN NaN
## # ... with 1 more variables: Weighted_Price <dbl>