Given

Write appropriate functions to solve for the following equations:

a$)$ Sum of squares for $x,S{S}_x={\displaystyle \underset{i=1}{\overset{n}{}}}{x}_i^2-\frac{({\displaystyle \underset{i=1}{\overset{n}{}}}{x}_i{)}^2}{n}$

b$)S_{\text{p}\text{o}\text{o}\text{l}\text{e}\text{d}}=\sqrt[\phantom{2}]{\frac{(n_1-1)S_1^2+(n_2-1)S_2^2}{n_1+n_2-2}}$NEED R$-$PROGRAMMING FOR THE FUNCTION