Rで解析:変数、コンソールの消去がラクラク「mise」パッケージ

Rの解析に役に立つ記事
スポンサーリンク

作業が長引くと変数やコンソール、プロットがゴチャゴチャになりがちです。これらを一気に消去できれば、そんな問題を解決するパッケージの紹介です。なお、読み込んだパッケージも解除することが可能です。

パッケージバージョンは0.1.0。実行コマンドはwindows 7およびOS X 10.11.5のR version 3.3.0で確認しています。

スポンサーリンク

パッケージのインストール

下記コマンドを実行してください。

#パッケージのインストール
install.packages("mise")

実行コマンド

詳細はコマンド、パッケージのヘルプを確認してください。

#パッケージの読み込み
library("mise")

###データ例の作成#####
n <- 100
TestData <- data.frame("Group" = sample(paste0("Group", 1:3), n, replace = TRUE),
                       "Data 1" = sample(rnorm(10), n, replace = TRUE),
                       "Data 2" = sample(LETTERS[1:10], n, replace = TRUE))
#欠損値を追加
TestData[50:100,] <- NA
TestData <- cbind(TestData, NAData = NA)
#構造確認
summary(TestData)
########

#ワークスペースやコンソールの内容を消去:miseコマンド
#変数内容削除:varオプション
#プロット内容削除:figsオプション
#コンソール内容削除:consoleオプション
#パッケージの読込解除:pkgsオプション;初期値FALSE
mise(vars = TRUE, figs = TRUE, console = TRUE, pkgs = TRUE)

#参考miseコマンドのコード
function (vars = TRUE, figs = TRUE, console = TRUE, pkgs = FALSE)
{
  if (vars) {
    where <- parent.frame()
    rm(list = ls(envir = where), envir = where)
  }
  if (figs &amp;&amp; !is.null(grDevices::dev.list())) {
    grDevices::graphics.off()
  }
  if (console) {
    if (Sys.getenv("RSTUDIO") == 1) {
      cat("\f")
    }
    else {
      cat(rep("\n", 50))
    }
  }
  if (pkgs) {
    extra.pkgs <- paste("package:", names(utils::sessionInfo()$otherPkgs),
                        sep = "")
    lapply(extra.pkgs, detach, character.only = TRUE, unload = TRUE,
           force = TRUE)
  }
}
<environment: namespace:mise>

少しでも、あなたの解析が楽になりますように!!

タイトルとURLをコピーしました