---
title: "RTTWebClient"
output: rmarkdown::html_vignette
vignette: >
%\VignetteIndexEntry{RTTWebClient}
%\VignetteEngine{knitr::rmarkdown}
%\VignetteEncoding{UTF-8}
---
```{r, include = FALSE}
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>"
)
```
```{r setup, eval=FALSE}
library(RTTWebClient)
library(lubridate)
```
# Example of RTTWebApiHost (Wrapper about RTTWebClient to make request from R easy)
## Init RTTWebApiHost obj
```{r, eval=FALSE}
ttWebApiHost <- InitRTTWebApiHost(server = "ttlivewebapi.fxopen.com")
```
## Get Dividends data.table
```{r, eval=FALSE}
print(ttWebApiHost$GetDividends())
```
## Get Symbol data.table
```{r, eval=FALSE}
print(ttWebApiHost$GetSymbolsInfo())
```
## Get BarHistory data.table
```{r, eval=FALSE}
print(ttWebApiHost$GetBarsHistory("EURUSD", "Bid","M1", now("UTC") - days(1), now("UTC")))
```
## Get TicksHistory data.table
```{r, eval=FALSE}
print(ttWebApiHost$GetTickHistory("EURUSD", now("UTC") - days(1), now("UTC")))
```
## Get Currency data.table
```{r, eval=FALSE}
print(ttWebApiHost$GetCurrencyInfo())
```