vscode-R: Unable to attach active R terminal: `could not find function ".vsc.attach"`

@pehkawn The init.R should only be sourced in interactive sessions. I updated the wiki:

if (interactive() && Sys.getenv("RSTUDIO") == "") {
  source(file.path(Sys.getenv(if (.Platform$OS.type == "windows") "USERPROFILE" else "HOME"), ".vscode-R", "init.R"))
}

If the R session is non-interactive or is an RStudio session, then it should not source init.R.

Thanks, for the tip! Adding the following code snippet

source(file.path(Sys.getenv(
   if (.Platform$OS.type == "windows") "USERPROFILE" else "HOME"
 ), ".vscode-R", "init.R"))

at the beginning of "~/.Rprofile the solved the problem. =)

I am experiencing a problem similar to the one discussed in this issue. Due to certain circumstances, I want to use R with “r.alwaysUseActiveTerminal”: true. Actually, I am using a supercomputer environment (Grid Engine) and need to use R while securing computing resources. When I launch R/Radian in that environment, the indicator in the bottom right corner of VS code shows “R: (not attached).” Even if I manually execute .vsc.attach() as told in this issue, it returns an error "Error in .vsc.attach(): could not find function “.vsc.attach”.

I have confirmed that I can execute .vsc.attach() without any problems/error messages when “r.alwaysUseActiveTerminal”: false", and the the bottom right indicates R is successfully attached. This might be off-topic, but I would really appreciate your help.

Then, as a workaround, the following configuration may work by loading init.R immediately after R is started. https://github.com/REditorSupport/vscode-R/wiki/R-Session-watcher#advanced-usage-for-self-managed-r-sessions

Yes, ~/.vscode-R/init.R references another file /home/user/.vscode/extensions/reditorsupport.r-2.4.0/R/session/init.R.

Contents ~/.vscode-R/init.R:

local(source("/home/user/.vscode/extensions/reditorsupport.r-2.4.0/R/session/init.R", chdir = TRUE, local = TRUE))

Contents ~/.vscode/extensions/reditorsupport.r-2.4.0/R/session/init.R:

# This file is executed with its containing directory as wd

# Remember the working directory (should be extension subfolder that contains this script)
dir_init <- getwd()


# This function is run at the beginning of R's startup sequence
# Code that is meant to be run at the end of the startup should go in `init_last`
init_first <- function() {
  # return early if not a vscode term session
  if (
    !interactive()
    || Sys.getenv("RSTUDIO") != ""
    || Sys.getenv("TERM_PROGRAM") != "vscode"
  ) {
    return()
  }

  # check requried packages
  required_packages <- c("jsonlite", "rlang")
  missing_packages <- required_packages[
    !vapply(required_packages, requireNamespace,
      logical(1L), quietly = TRUE)
  ]

  if (length(missing_packages)) {
    message(
      "VSCode R Session Watcher requires ",
      toString(missing_packages), ". ",
      "Please install manually in order to use VSCode-R."
    )
  } else {
    # Initialize vsc utils after loading other default packages
    assign(".First.sys", init_last, envir = globalenv())
  }
}

old.First.sys <- .First.sys

# Overwrite for `.First.sys`
# Is used to make sure that all default packages are loaded first
# Will be assigned to and called from the global environment,
# Will be run with wd being the user's working directory (!)
init_last <- function() {
  old.First.sys()

  # cleanup previous version
  removeTaskCallback("vscode-R")
  options(vscodeR = NULL)
  .vsc.name <- "tools:vscode"
  if (.vsc.name %in% search()) {
    detach(.vsc.name, character.only = TRUE)
  }

  # Source vsc utils in new environmeent
  .vsc <- new.env()
  source(file.path(dir_init, "vsc.R"), local = .vsc)

  # attach functions that are meant to be called by the user/vscode
  exports <- local({
    .vsc <- .vsc
    .vsc.attach <- .vsc$attach
    .vsc.view <- .vsc$show_dataview
    .vsc.browser <- .vsc$show_browser
    .vsc.viewer <- .vsc$show_viewer
    .vsc.page_viewer <- .vsc$show_page_viewer
    View <- .vsc.view
    environment()
  })
  attach(exports, name = .vsc.name, warn.conflicts = FALSE)

  # overwrite S3 bindings from other packages
  suppressWarnings({
    if (!identical(getOption("vsc.helpPanel", "Two"), FALSE)) {
      # Overwrite print function for results of `?`
      .vsc$.S3method(
        "print",
        "help_files_with_topic",
        .vsc$print.help_files_with_topic
      )
      # Overwrite print function for results of `??`
      .vsc$.S3method(
        "print",
        "hsearch",
        .vsc$print.hsearch
      )
    }
    # Further S3 overwrites can go here
    # ...
  })

  # remove this function from globalenv()
  suppressWarnings(
    rm(".First.sys", envir = globalenv())
  )

  # Attach to vscode
  exports$.vsc.attach()

  invisible()
}

init_first()