rbrsa: An R Package for Turkish Banking Sector Data

Documentation

An R package for programmatic access to Turkish banking sector data from the Turkish Banking Regulation and Supervision Agency (BRSA, known as BDDK in Turkish). The package provides R users with a clean interface to fetch monthly and quarterly banking statistics, financial reports, and sectoral indicators directly from BRSA’s official APIs.

Key Features

Design Philosophy

Lightweight and Authentic: Other packages providing access to BDDK data (like bddkR) also fetch data programmatically, but they add a heavy translation layer -maintaining manual configuration files to map Turkish column names and categorical values to English. This provides user convenience at a high maintenance cost.

rbrsa takes a different path. It interacts directly with the API and uses the data it returns with minimal alteration:

This is a deliberate choice. By avoiding a separate translation file, rbrsa eliminates a major maintenance burden, aiming to adapt instantly to any API changes. This way, the data you see is exactly what the official source provides.

Installation

You can install from CRAN

install.packages("rbrsa")

The development version can be installed from GitHub:

#install.packages("pak")
pak::pkg_install("obakis/rbrsa")

Getting started

Full package documentation with function references is available at: https://obakis.github.io/rbrsa/

The rbrsa package retrieves tables from two distinct publication portalsmaintained by the Turkish Banking Regulation and Supervision Agency (BDDK). Both portals are official sources, but they organize the data differently:

library(rbrsa)
## Explore available tables
list_tables("bddk") # list_tables("bddk","tr")
list_tables("finturk")  # list_tables("finturk", "tr")
list_groups("bddk")  
list_groups("bddk","tr")  
list_groups("finturk")

## Monthly data (Table 15: Ratios)
data <- fetch_bddk(2024, 1, 2024, 3, table_no = 15, grup_kod = 10001)

## Quarterly FinTurk data
q_data <- fetch_finturk(2024, 3, 2024, 9, table_no = 1, grup_kod = 10007)

## Save results
temp_file <- tempfile() # filename should be without extension
save_data(q_data, temp_file, format = "csv")

mirror server hosted at Truenetwork, Russian Federation.