if you want to debug a vector just print like this:

print(displacement)

will produce in console:

  [1]  1 -1 -1 -1  0 -1 -1 -1  0 -1 -1 -1 -1  0 -1 -1 -1  0 -1 -1 -1 -1  0 -1 -1
 [26] -1  0 -1 -1 -1 -1  0 -1 -1 -1  0 -1 -1 -1  0 -1 -1 -1 -1  0 -1 -1 -1  0 -1
 [51] -1 -1  0 -1 -1 -1 -1  0 -1 -1 -1  0 -1 -1 -1  0 -1 -1 -1  0 -1 -1 -1  0 -1
 ....

copy paste in vim and there remove the initial [xxx] using:
:%s/\[.*\]//

save:
:w

then open in R
a=scan("myfile.txt")
