I need this function to be written in R using one of the three packages attached below. Please send me either a screenshot or the Rmd file if possible. Also, please include comments on processes. (must be done in R Notebook)
Q8. Write a function with two inputs: x and label: if label is 0, return x −√x; if label is1, return x +√x. Create an R package and name it use your last name. Install yourpackage on your machine. Call your R function in your package and use quality as x,and white-or-red as label (white is 0 and red is 1). Create a histogram in R to showthe distribution of transformed “quality”.• Hint: consider R package glue, devtools, roxygen2 8. Write a function with two inputs: x and label: if label is 0, return x – – Vx; if label is
1, return x + Vr. Create an R package and name it use your last name. Install your
package on your machine. Call your R function in your package and use quality as x,
and white-or-red as label (white is 0 and red is 1). Create a histogram in R to show
the distribution of transformed “quality”.
• Hint: consider R package glue, devtools, roxygen2