Update TAVR-database-analysis.R