如题：
我是在windows下运行R的，用的平台是R-stiduo，每次设置目录时，每次都要把"\",换成"/"或"\\"，就想编写个函数：
a<-c("C:\Users\Admin-pc\Desktop\data-2015-6-24")
df_default_directory<-function(a){
  gsub("\","/",a)
  setwd(a)
}

结果报错：
> a<-c("C:\Users\Admin-pc\Desktop\data-2015-6-24")
Error: '\U' used without hex digits in character string starting ""C:\U"

好像是编码错误，上网搜索了一下，没有看明白，就来求组，想弄明白怎么实现，为什么向量不能编码"\U"?
十分感谢