Analyze CleverPush Data in R via JDBC
Access CleverPush data with pure R script and standard SQL on any machine where R and Java can be installed. You can use the CData JDBC Driver for CleverPush and the RJDBC package to work with remote CleverPush data in R. By using the CData Driver, you are leveraging a driver written for industry-proven standards to access your data in the popular, open-source R language. This article shows how to use the driver to execute SQL queries to CleverPush and visualize CleverPush data by calling standard R functions.
Install R
You can match the driver's performance gains from multi-threading and managed code by running the multithreaded Microsoft R Open or by running open R linked with the BLAS/LAPACK libraries. This article uses Microsoft R Open 3.2.3, which is preconfigured to install packages from the Jan. 1, 2016 snapshot of the CRAN repository. This snapshot ensures reproducibility.
Load the RJDBC Package
To use the driver, download the RJDBC package. After installing the RJDBC package, the following line loads the package:
library(RJDBC)
Connect to CleverPush as a JDBC Data Source
You will need the following information to connect to CleverPush as a JDBC data source:
- Driver Class: Set this to cdata.jdbc.api.APIDriver
- Classpath: Set this to the location of the driver JAR. By default this is the lib subfolder of the installation folder.
The DBI functions, such as dbConnect and dbSendQuery, provide a unified interface for writing data access code in R. Use the following line to initialize a DBI driver that can make JDBC requests to the CData JDBC Driver for CleverPush:
driver <- JDBC(driverClass = "cdata.jdbc.api.APIDriver", classPath = "MyInstallationDir\lib\cdata.jdbc.api.jar", identifier.quote = "'")
You can now use DBI functions to connect to CleverPush and execute SQL queries. Initialize the JDBC connection with the dbConnect function.
Start by setting the Profile connection property to the location of the Cleverpush Profile on disk (e.g. C:\profiles\Cleverpush.apip). Next, set the ProfileSettings connection property to the connection string for Cleverpush (see below).
Cleverpush API Profile Settings
CleverPush uses private API keys to authenticate requests. Your API key is passed as the Authorization request header value on every API call.
You can find your private API key in the CleverPush dashboard under Settings > API. Use the private key (not the public key) for server-side access.
After setting the following connection properties, you are ready to connect:
- AuthScheme: Set this to APIKey.
- APIKey: Set this to your CleverPush private API key.
Optional Connection Properties
- ChannelId: Set this to your default CleverPush channel identifier. Most tables require a channel filter. Setting this property allows queries without specifying ChannelId in every WHERE clause.
Built-in Connection String Designer
For assistance in constructing the JDBC URL, use the connection string designer built into the CleverPush JDBC Driver. Either double-click the JAR file or execute the jar file from the command-line.
java -jar cdata.jdbc.api.jar
Fill in the connection properties and copy the connection string to the clipboard.
Below is a sample dbConnect call, including a typical JDBC connection string:
conn <- dbConnect(driver,"jdbc:api:Profile=C:\profiles\Cleverpush.apip;ProfileSettings='APIKey=my_api_key';")
Schema Discovery
The driver models CleverPush APIs as relational tables, views, and stored procedures. Use the following line to retrieve the list of tables:
dbListTables(conn)
Execute SQL Queries
You can use the dbGetQuery function to execute any SQL query supported by the CleverPush API:
segments <- dbGetQuery(conn,"SELECT Id, Name FROM Segments WHERE ChannelId = 'your_channel_id'")
You can view the results in a data viewer window with the following command:
View(segments)
Plot CleverPush Data
You can now analyze CleverPush data with any of the data visualization packages available in the CRAN repository. You can create simple bar plots with the built-in bar plot function:
par(las=2,ps=10,mar=c(5,15,4,2))
barplot(segments$Name, main="CleverPush Segments", names.arg = segments$Id, horiz=TRUE)