Instead of splitting that path over multiple lines within the setwd() function, I would suggest the following, which is more reproducible if you or anyone else needs to update the file path in the future:
my_path <- '~/a/very/long/path/here/that/goes/beyond/80/characters/and/then/some/more'
setwd(my_path)