Applied Statistics and Data Mining

文書の過去の版を表示しています。

これはただのラッパー。

set.proxy = function(proxy) {
  if( is.list(proxy) ) {
    if( length(proxy) == 3 ) {
      Sys.setenv("http_proxy"=proxy[1])
      Sys.setenv("https_proxy"=proxy[2])
      Sys.setenv("ftp_proxy"=proxy[3])
    } else {
      Sys.setenv("http_proxy"=proxy[1])
      Sys.setenv("https_proxy"=proxy[1])
      Sys.setenv("ftp_proxy"=proxy[1])
    }
  } else {
    Sys.setenv("http_proxy"=proxy)
    Sys.setenv("https_proxy"=proxy)
    Sys.setenv("ftp_proxy"=proxy)
  }
}

使用法は次のとおり。

set.proxy(c("http://proxy.uec.ac.jp:8080",  "http://proxy.uec.ac.jp:8080", "http://proxy.uec.ac.jp:8080"))

set.proxy("http://proxy.uec.ac.jp:8080")