didTEnets: Transfer Entropy-Informed Difference-in-Differences for Network Analysis
Source:R/didTEnets-package.R
didTEnets-package.Rd
The didTEnets package implements the Transfer Entropy-informed Difference-in-Differences (TE-DiD) framework for policy evaluation in interconnected systems. This methodology combines network analysis with causal inference to measure policy effects on financial contagion and systemic risk transmission.
Key Features
Network-based contagion analysis using transfer entropy
Policy impact assessment with spillover effects
Financial network visualization and evolution analysis
Robust difference-in-differences estimation with two-way fixed effects
Comprehensive crisis period analysis tools
Main Functions
run_complete_tedid_analysis
: Complete analysis pipelinedownload_financial_data
: Financial data acquisitioncalculate_enhanced_transfer_entropy
: Transfer entropy calculationcalculate_network_weights
: Network weight constructioncalculate_nici
: Network-Informed Contagion Indexcalculate_nipi
: Network-Informed Policy Intensityestimate_tedid_model
: TE-DiD model estimationcreate_network_comparison
: Network visualization
Methodology
The TE-DiD framework addresses limitations of traditional policy evaluation by:
Using network-informed outcome variables instead of simple returns
Measuring directed information flows with transfer entropy
Accounting for policy spillover effects through network weights
Analyzing crisis contagion with quantile conditioning
Providing comprehensive network evolution visualization
Typical Workflow
Define financial market tickers and analysis period
Download financial data and create policy measures
Calculate network weights and transfer entropy matrices
Construct NICI (outcome) and NIPI (treatment) variables
Estimate TE-DiD models with appropriate controls
Visualize network evolution and policy effects
Interpret results for policy recommendations
References
Schreiber, T. (2000). Measuring information transfer. Physical Review Letters, 85(2), 461.
Angrist, J. D., & Pischke, J. S. (2009). Mostly harmless econometrics: An empiricist's companion. Princeton University Press.
Examples
if (FALSE) { # \dontrun{
# Quick start example
library(didTEnets)
# Define markets for analysis
tickers <- c("^GSPC" = "USA", "^FTSE" = "GBR", "^GDAXI" = "DEU")
# Run complete analysis
results <- run_complete_tedid_analysis(
tickers = tickers,
start_date = "2019-01-01",
end_date = "2021-12-31",
create_plots = TRUE
)
# View main results
summary(results$tedid$main_model)
print(results$summary)
# Access visualizations
if (!is.null(results$plots)) {
print(results$plots$tedid_plots$timeseries)
}
} # }