言語 R のアプリオリで,相関ルールの左辺値を指定するメモ
左辺値を特定のものに指定する方法です
apriori(hoge,parameter=list(support=0.01, confidence=0.5),appearance = list(lhs = c("AAA"), default = "rhs"))
これで,左辺値が AAA のみであるルールをマイニングします.
lhs と rhs を逆にすることで右辺値を指定できます.
左辺値と右辺値を両方を指定するときは以下のようにします.
apriori(hoge,parameter=list(support=0.01, confidence=0.3),appearance = list(lhs = c("AAA"), rhs = c("BBB"), default = "none"))
これで AAA => BBB というルールのみをマイニングします.
現在,左辺値を集合にする方法を探し中です... (左辺値に AAA を含む)
言語 R で csv からアプリオリを動かして,出力を保存するメモ
言語 R を用いて,アプリオリアルゴリズムから相関ルールを求めるメモです.
以下を入力します.
library(arules)
hoge <- read.transactions("hoge.csv",sep=",")
hoge.ap <- apriori(hoge,parameter=list(support=0.01, confidence=0.5))
inspect(head(SORT(hoge.ap,by="support"),n=20))
説明:
1. 相関ルールのライブラリを読み込む
2. csv ファイルを読み込んで transactions クラスのオブジェクトにする
3. ミニマムサポート 0.01 ミニマムコンフィデンス 0.5 でアプリオリアルゴリズムにかける
4. サポート値によってソートし上位から 20 個を表示する.(head を tail にすると下から)
この出力をファイルに保存したい時は,以下を入力する
t = capture.output(inspect(head(SORT(fuga.ap,by="support"),n=100000)))
write(t,"fuga.txt")
以上でとりあえず相関ルールを求めることができます.
はてなブックマークのおすすめタグを挿入するショートカット user.js
こんにちわ。
Opera ではてなブックマークをするときに JavaScript を登録しておいて、
アドレスバーに (例えば) b を入れてはてブしたりすると思います。
そんなときに次の画面になると思うのですが、タグを入れるのが面倒です。
そこで以下のように、Command + 数字(1~9のみ) を入力すると、
おすすめタグを挿入してくれる user.js を作りました。
こんな感じ↓
ソースコードは gist です。
ほとんど id:edvakf さんのを再利用させていただきました。
ありがとうございます!!
以下バグです。
1.「おすすめタグ」のみ
2.数字が 1~9 までしか対応していない
以上です.
Mac の Flex Builder 3 の Run 等を他のブラウザに変更する
デフォルトだと safari が起動してしまいます。
Opera ではありませんね。
・・・
Opera を例として以下にのせます。
1.メニューバーから Window -> Preferences... -> General(一般) -> Web Browser を選択
2.外部のブラウザを使う を選択
3.New(新規) をクリック
4.Name(名前)のところに Opera と入力
5.Location の入力欄にフォーカス
ここで、Browse では Opera.app になってしまい、
The location value is not a valid path name.
と言われてしまいます。そのため、ターミナルから Opera* という実行ファイルを探します。
そしてこの * をとったパス
これを Location に入力(貼り付け)します。そして OK を押せば登録完了になります。
あとは、Opera のチェックボックスをオンにすれば完了です。
^^v