[R] Help on tidy_source

[Agony]

Dear all,
Good time.

Could anybody can help me with my below code on Windows 7 and R 3.1.0
when I run this code:

tidy_source (
 "ugly script.R",
 file = "beautiful script.R"
 )


I encounter this error message:

Error in parse(text = x, keep.source = TRUE) : 
  <text>:11:14: unexpected '=='
10: 
11: Crtl+Alt+N ====
                 ^


Bunch of thanks in advance
Best,
Amir