差分
このページの2つのバージョン間の差分を表示します。
両方とも前のリビジョン前のリビジョン次のリビジョン | 前のリビジョン | ||
mva:correlation [2022/05/21 08:36] – watalu | mva:correlation [2022/05/21 09:38] (現在) – watalu | ||
---|---|---|---|
行 1: | 行 1: | ||
- | [[https://statistics.co.jp/ | + | [[https://www.math.chuo-u.ac.jp/~sugiyama/ |
< | < | ||
行 13: | 行 13: | ||
- | # require.with.install.packages: | + | # require.with.install.packages.if.needed: |
# リストで与えられたライブラリがインストール済みかどうかをチェックし、 | # リストで与えられたライブラリがインストール済みかどうかをチェックし、 | ||
# 必要ならインストールした上で、利用可能にする関数。 | # 必要ならインストールした上で、利用可能にする関数。 | ||
# この関数は理解しなくても大丈夫。 | # この関数は理解しなくても大丈夫。 | ||
- | require.with.install.packages = function(packages) { | + | require.with.install.packages.if.needed |
require.2 = function(p) { | require.2 = function(p) { | ||
if( eval(parse(text = paste0(" | if( eval(parse(text = paste0(" | ||
行 31: | 行 31: | ||
} | } | ||
} | } | ||
- | if(is.list(packages)) { | + | if(is.vector(packages)) { |
for( k in packages) { | for( k in packages) { | ||
require.2(k) | require.2(k) | ||
行 40: | 行 40: | ||
} | } | ||
- | # この演習で用いるライブラリをインストールする | + | # この演習で用いるライブラリを読み込むかインストールする |
- | require.with.install.packages(c(" | + | require.with.install.packages.if.neededs(c(" |
# 科目ごとに点数のヒストグラムを描く | # 科目ごとに点数のヒストグラムを描く |