読者です 読者をやめる 読者になる 読者になる

simudaru's blog

Python, Rなどのメモを残していこうと思います。  よろしくお願いいたします。

R

【R】コマンドライン引数

R

コマンドライン引数を取るスクリプトの雛形を作っておこうと思う。今回はR。 # --------------------------------------------------------- # コマンドライン引数を取るコードの雛形 # --------------------------------------------------------- args <- …

【R】ファイルの存在確認

R

Rでファイルの存在確認を行うには、file.access関数を使う。 存在するときに0、存在しないときに-1を返すので、 if (file.access('hoge')) {} と書くと hogeが存在するときに{}が実行されず、 hogeが存在しないときに{}が実行されることとなり、 感覚と合わ…

【CodeIQ】第4回デスマコロシアム

第4回デスマコロシアムに参加しましたが、予選敗退でした。 https://codeiq.jp/magazine/2014/07/12364/ 今回は、下記でR言語の最短賞のバッジを狙いに行きました。 R for(z in 1:8*2){cat(intToUtf8(seq(36,117,z)))} 46文字 重複18文字 -874点今回、一応最…

【R】reshape2パッケージの関数をだいたい試しました

Rのreshape2パッケージを試してみました。 データフレームを縦持ちにしたり横持ちにしたりしてくれます。 時系列ではおなじみの、airqualityデータで試してみました。 今回はコードを分割してブログ記載していますが、 もとはひとつのコードですので、途中か…

【CodeIQ】第3回デスマコロシアム

第3回デスマコロシアムに参加し、ベスト16まで残りました。 https://codeiq.jp/magazine/2014/06/10989/ 今回は、下記で最短賞のバッジを取りに行きました。 Octave disp("A":"z")13文字10種 -130点もちろん一番乗りではありません。 octaveが最短と聞いてか…

【R】e1071パッケージのbclust関数を試しました

Rのe1071パッケージ、bclustを試してみました。 K-meansなどの分割クラスタリング手法をbootstrapで繰り返し、 その結果を階層クラスタリングにより統合する、という手法です。 おなじみのirisデータで試してみました。 # bclustについて # Bagged Clusterin…

【R】e1071パッケージのallShortesPath関数を試しました

Rのe1071パッケージ、allShortesPathを試してみました。有向グラフあるいは無向グラフの、ノード間の最短距離を計算する関数です。 計算にはワーシャル-フロイド法を使っているとのことです。 # allShortesPathとextractPathについて library(e1071) # 5node…

【CodeIQ】第2回デスマコロシアム

第2回デスマコロシアムに参加し、見事敗退しました。 https://codeiq.jp/magazine/2014/05/9744/ 第1回も敗退と、なかなか勝てないです……。 Rで64文字、下記コードで参加しました。 R x=12289;intToUtf8(sort(rep(65:90,8))+c(32,0,x,x+96,x+96,x,0,32)) Rは…