Question

在python中，可以使用以下命令在Windows计算机上获取桌面路径：

os.sep.join((os.path.expanduser("~"), "Desktop"))

R中是否有相同的东西？

Answer 1

~扩展到您的文档主页，而不是桌面通常所在的用户配置文件。我建议您使用Sys.getenv查找您的用户个人资料：

file.path(Sys.getenv("USERPROFILE"),"Desktop")

Answer 2

类似的东西（如评论中所述）：

file.path(path.expand('~'),'Desktop')

Answer 3

无法在James的回答中添加评论，所以这是另一个答案。

在终端服务器网络上：

file.path(Sys.getenv("USERPROFILE"),"Desktop")给了我错误的结果

file.path(Sys.getenv("HOMESHARE"),"Desktop")为我提供了正确的结果

在我的本地机器上，反之亦然。我还没有找到适用于这两种环境的解决方案。

已编辑添加

好的，根据我在评论中提供的链接，这是一个很好的克服。 Windows专家可能会做得更好，但我认为这适用于两种环境，并且应该能够抵御桌面路径的变化。

创建一个VBscript文件以返回桌面路径：getDesk.vbs

dim WSHShell, desktop, pathstring, objFSO
set objFSO=CreateObject("Scripting.FileSystemObject")
Set WSHshell = CreateObject("WScript.Shell")
desktop = WSHShell.SpecialFolders("Desktop")
pathstring = objFSO.GetAbsolutePathName(desktop)
WScript.Echo pathstring

现在在R中你可以执行VBscript来返回桌面路径

system("cscript //nologo getDesk.vbs", intern=TRUE)

在R中查找桌面路径

3 个答案: