For the codes below I am using RStudio

I am trying to debug this code...

and trying to write this code in RStudio

Please help I am using RStudio and would like and RStudio friendly code thank you so much! :)

197 - "**{r eval=TRUE, error=TRUE, message=TRUE, warning=TRUE, include=TRUE} 198 #debug 199 counter = 0 200 - while (counter > 100) { 201 if (counter %% 2 = 1) 202 print (paste(counter," is odd")) 203 - } 204 else { 205 print (paste(counter," is odd")) 206 counter = counter + 1 207) 208 209 x 211 212 write a while loop to : print the square roots of the first 25 odd positive integers. 213 214 *{r eval=TRUE, error=TRUE, message=TRUE, warning=TRUE, include=TRUE} 215 #write your code in below blank 216 217 218