⚠️There's a newer version (1.0.4) of this package. Take me there.

tbl2xts

Introduction

This package helps users who want to put data.frame or tbl_df objects into xts format easily. Xts is a powerful package used to convert data frames into time-series. This package is widely used in other packages in R too.

The problem is that often times users want to move from a tbl format, or a tidyverse format, into xts, but doing so can be an onerous task. This package aims to overcome this problem by bridging the tbl_df or data.table to xts gap. It also allows the user to use a spread_by argument for an easy character column xts conversion for tidy data.

Examples

To illustrate the ease with which tbl2xts transforms data.frames or tbl_dfs into xts format, consider the following example.

Example 1

Load the tbl_df data set included with the package, and transform it into xts format.

library(dplyr)
library(tbl2xts)
tbldata <- TRI
xtsdata <- tbldata %>% 
tbl_xts(., cols_to_xts = "TRI", spread_by = "Country", spread_name_pos = "Suffix")

Notice that the column name convention is to use the spread_by name, underscore, column name. In the example above, it is Country_TRI.

To now transform the xts object back into a tbl_df() object, simply use the inverse command:

xtsdata %>% xts_tbl()

Example 2

tbl_xts also facilitates the use of tbl_df data frames in packages that use xts. As an illustration, see the output for TRI with the package PerformanceAnalytics. As we are working with Total Return Index values, suppose we wanted to calculate the weekly returns, and then the ... using PerformanceAnalytics. This can now be achieved with neat code as follows:

library(dplyr)
library(tbl2xts)
library(PerformanceAnalytics)
tbldata <- TRI
tbldata %>% 
tbl_xts(., cols_to_xts = "TRI", spread_by = "Country") %>% 
lapply(.,Return.calculate, "discrete") %>% Reduce(merge,.) %>% table.DownsideRisk(.)

Note that lapply was used to apply the Return.Calculate to each column, while Reduce was used to merge all the lists created using lapply into a single data frame. We then pipe all the returns into, e.g., the table.DownsideRisk function, or any other applicable function in the PA package.

Note

The input requires the data to be in data.frame() or tbl_df() form, with a valid date column being provided (similar to the requirement for the xts package). The function will check if a column date, DATE, or Date exists, or alternatively look for a valid timeBased object in your worfkile and rename it Date. This column can be either a Date, POSIXct, chron, yearmon, yearqtr or timeDate (see ?timeBased) column. The validity of the date column can be tested using:

data(TRI)
TRI[,"Date"] %>% .[[1]] %>% timeBased()

If TRUE, it is a valid date column.

Copy Link

Version

Down Chevron

Install

install.packages('tbl2xts')

Monthly Downloads

1,595

Version

0.1.2

License

GPL-3

Maintainer

Last Published

August 2nd, 2017

Functions in tbl2xts (0.1.2)