第七色在线视频,2021少妇久久久久久久久久,亚洲欧洲精品成人久久av18,亚洲国产精品特色大片观看完整版,孙宇晨将参加特朗普的晚宴

為了賬號(hào)安全,請(qǐng)及時(shí)綁定郵箱和手機(jī)立即綁定
已解決430363個(gè)問題,去搜搜看,總會(huì)有你想問的

確定執(zhí)行腳本的路徑

確定執(zhí)行腳本的路徑

慕田峪9158850 2019-07-02 16:16:00
確定執(zhí)行腳本的路徑我有一個(gè)叫foo.R其中包括另一個(gè)腳本other.R,它位于同一個(gè)目錄中:#!/usr/bin/env Rscriptmessage("Hello")source("other.R")但我想R才能發(fā)現(xiàn)other.R不管當(dāng)前的工作目錄是什么。換句話說,foo.R需要知道它自己的路。我怎么能這么做?
查看完整描述

3 回答

?
交互式愛情

TA貢獻(xiàn)1712條經(jīng)驗(yàn) 獲得超3個(gè)贊

這里這個(gè)問題有一個(gè)簡(jiǎn)單的解決辦法。這個(gè)命令:

script.dir <- dirname(sys.frame(1)$ofile)

返回當(dāng)前腳本文件的路徑。腳本保存后,它就能工作了。


查看完整回答
反對(duì) 回復(fù) 2019-07-02
?
守著一只汪

TA貢獻(xiàn)1872條經(jīng)驗(yàn) 獲得超4個(gè)贊

當(dāng)從R控制臺(tái)“源”時(shí),我無法獲得SuppressingFire的解決方案。
在使用Rscript時(shí),我無法讓Hadley的解決方案工作。

兩個(gè)世界中最好的?

thisFile <- function() {
        cmdArgs <- commandArgs(trailingOnly = FALSE)
        needle <- "--file="
        match <- grep(needle, cmdArgs)
        if (length(match) > 0) {
                # Rscript
                return(normalizePath(sub(needle, "", cmdArgs[match])))
        } else {
                # 'source'd via R console
                return(normalizePath(sys.frames()[[1]]$ofile))
        }}


查看完整回答
反對(duì) 回復(fù) 2019-07-02
  • 3 回答
  • 0 關(guān)注
  • 896 瀏覽

添加回答

舉報(bào)

0/150
提交
取消
微信客服

購課補(bǔ)貼
聯(lián)系客服咨詢優(yōu)惠詳情

幫助反饋 APP下載

慕課網(wǎng)APP
您的移動(dòng)學(xué)習(xí)伙伴

公眾號(hào)

掃描二維碼
關(guān)注慕課網(wǎng)微信公眾號(hào)