Replace nested ifelse blocks

[Moohan]

Suggested by {lintr}

Calling ifelse() in nested calls is problematic for two main reasons:

1. It can be hard to read – mapping the code to the expected output for such code can be a messy task/require a lot of mental bandwidth, especially for code that nests more than once
2. It is inefficient – ifelse() can evaluate all of its arguments at both yes and no (see https://stackoverflow.com/q/16275149); this issue is exacerbated for nested calls

I think the code is significantly more readable now, however, ensuring it's functionally the same is a bit tricky, especially for the more complicated block in Demographics!

[Copilot]

Pull Request Overview

This PR replaces nested ifelse() statements with case_when() statements to improve code readability and performance. The changes eliminate deeply nested conditional logic that was difficult to follow and potentially inefficient due to ifelse() evaluating all arguments.

• Refactored nested ifelse() blocks in two files to use case_when() for cleaner conditional logic
• Improved variable naming and code structure in the population projection calculations
• Enhanced readability while maintaining the same functional behavior

Reviewed Changes

Copilot reviewed 2 out of 2 changed files in this pull request and generated 2 comments.

File	Description
Master RMarkdown Document & Render Code/Global Script.R	Simplified number formatting function using case_when() instead of nested ifelse()
Demographics/1. Demographics - Population.R	Replaced multiple nested ifelse() blocks with case_when() and refactored population projection logic

---

_{Tip: Customize your code reviews with copilot-instructions.md. Create the file or learn how to get started.}