I use the property: composition of bijections is also a bijection.
Let $f:[2,30]\cup\{0,1\}\rightarrow [0,1],$
$g:[0,1]\rightarrow (0,1),$
$h:(0,1)\rightarrow \bigg(-\dfrac{\pi}{2},\dfrac{\pi}{2}\bigg),$
$r: \bigg(-\dfrac{\pi}{2},\dfrac{\pi}{2}\bigg)\rightarrow R,$
$s:R\rightarrow (-2019,+\infty).$
Then we have composition $d=s\circ r\circ h\circ g\circ f:[2,30]\cup\{0,1\}\rightarrow (-2019,+\infty).$ I don't know how to define $f$ and I'm not sure for $s.$ For $s$ I would take $s(x)=e^x-2019.$ How could f be defined? Also, what if $A=(1,30],$ what should I take for $f?$
How about:
$$k:[2,30] \to [0,1]$$
defined by
$$k(x) = \dfrac{x-2}{28}$$
Then you have:
$$f(x) = \begin{cases}x, & x \in \{0,1\} \\ g\circ k(x), & \text{otherwise}\end{cases}$$
If you just want two injective functions, then how about:
$$p:[2,30]\cup \{0,1\} \to (-2019,\infty) \\ p(x) = x$$
and
$$q:(-2019,\infty) \to [2,30]\cup \{0,1\} \\ q(x) = 2+\dfrac{x+2019}{x+2020}$$
both of these functions are strictly increasing, so they are definitely injections. $p$ is obvious, while $q$ maps to $(2,3) \subset [2,30]\cup \{0,1\}$. Now, you can apply Schroeder-Bernstein.
Here is a good map from $(1,30] \to (-2019,\infty)$:
$$f:(1,30] \to (0,1] \\ f(x) = \dfrac{x-1}{29} \\ g:(0,1] \to (0,1) \\ g(x) = \begin{cases}\dfrac{1}{n+1}, & x = \dfrac{1}{n}, n\in \mathbb{N} \\ x, & \text{otherwise}\end{cases}$$
And then you can use your existing $h,r,s$ to get the rest of the way.