Fandom

Vim Tips Wiki

Script:2104

1,624pages on
this wiki
Add New Page
Talk0

Ad blocker interference detected!


Wikia is a free-to-use site that makes money from advertising. We have a modified experience for viewers using ad blockers

Wikia is not accessible if you’ve made further modifications. Remove the custom ad blocker rule(s) and the page will load as expected.

Use this page to discuss script 2104 R: execute R-code from Vim on Mac OS X

  • Add constructive comments, bug reports, or discuss improvements (see the guideline).
  • Do not document the script here (the author should do that on vim.org).
  • This page may be out of date: check the script's vim.org page above, and its release notes.

CommentsEdit

The posted version of the script replaces single-quotes with double-quotes, which is problematic when the quotes are nested.

Below I adapted the relevant portion of the script to allow for single-quotes. To interpret the alternative code (which uses a '$' in the system call), note that it seems that four backslashes are required to produce one blackslash that gets passed to Applescript.

[Note: I had trouble with escaped backslashes (`\\`). So I modified the code below. I don't really entirely understand what's going on with the backslashes between Vim and R--why do I need 16 backslashes for two to make it to R?--but this seems to work. Date: 2011-02-11]

Original code snippet:

  if a:mode == "selectedlines"
    " sending selected lines to interactive R application
    let command = join(getline(a:firstline,a:lastline),"\\n")
    let command = substitute(command,"\"","\\\\\"","g")
    let command = substitute(command,"\'","\\\\\"","g")
    call system("osascript -e 'tell application \"R\" to cmd \"" .command. "\"'")

Modified code snippet:

  if a:mode == "selectedlines"
    " sending selected lines to interactive R application
    let command = join(getline(a:firstline,a:lastline),"\n")
    let command = substitute(command,"\\","\\\\\\\\\\\\\\\\","g")
    let command = substitute(command,"'","\\\\'","g")
    let command = substitute(command,"\"","\\\\\\\\\"","g")
    call system("osascript -e $'tell application \"R64\" to cmd \"" .command. "\"'")

The modified code does not work for me. Yitping 08:40, May 20, 2011 (UTC)

Also on Fandom

Random Wiki