r - Convert function to string saving original formatting -

When I create a function in R, the function remembers the formatting used to create it with spaces. It can be found by printing the function:

  & gt; F & LT; - Function (x) {if (x == 1) {x} and {x + 1}} & gt; Print (f) function (x) {if (x == 1) {x} else {x + 1}}  

How do I remove that representation from the function? For example, to save it in a variable for further manipulation?