Q$3($STAT$471$ students only$).$ For a sequence $a=\{a_1,a_2,$dots,$a_n\},$ its com$-$

panion sequence is simply $a^{***}=\{a_n,a_{n-1},$dots,$a_1\}.$ Construct your R func$-$

tion $r()$ which yields the companion sequence $a^{***}$ for a given sequence $a$ of

any size $n.$ Apply your own $)$ function to the sequence $a=\{6,2,4,-3,5\}$

to see whether it works. The output is expected to be $\{5,-3,4,2,6\}.$ Your

$)$ function shall not bear any iterations or use of any built$-$in functions to

generate the companion sequence.

R code.