タグ

関連タグで絞り込む (0)

  • 関連タグはありません

タグの絞り込みを解除

RとPRMLに関するsatojkovicのブックマーク (5)

  • 「Machine Learning for hackers」読了 - makotoiの日記:from London

    Machine Learning for Hackersposted with amazlet at 12.06.06Drew Conway John Myles White Oreilly & Associates Inc 売り上げランキング: 543 Amazon.co.jp で詳細を見る Bit.lyのチーフサイエンティストの人もカンファレンスで推薦していただったのでバケーションやロングウィークエンドを利用して10日ほどで一気読みしました。 このの良いところは全てのコードサンプルがRで提供されている点。他のマシーンラーニング系のPythonなどのスクリプト言語と併用している場合が多いのでRに興味がある人は「Pythonまで勉強するのはめんどくさい」 と思ってしまうので良いかもしれません。あとRの知識も統計学の知識も特に前提としていないので、そういう話題(例えば行列計算など)に

    「Machine Learning for hackers」読了 - makotoiの日記:from London
  • PRML 10章の変分ベイズによる混合ガウス分布推論の検証(フォロー編) - 木曜不足

    「パターン認識と機械学習(PRML)」10.2 章に従って変分ベイズ(Variational Bayes, VB)を R で実装してみて、PRML に書いてある内容通りか確認してみたところ、なんか違う。 「『変分混合ガウス分布は、余った混合要素は勝手にゼロになるから K が大きくてもいいよ』とか書いてあるけど全然縮退しないよ。ベイズ職人でないとうまくいかないらしいよ」 「初期値について『対称性から、通常 m_0=0 とおく』と書いてあるけど、ほんとに m_0=0 にしたら、全パラメータが k に対して同じ値になっちゃうよ」 と言いふらしていたら、スクリプトのバグだった。 ので、罪滅ぼしにまじめにもうちょっといろいろ検証してみたよ、というお話。 経緯 変分ベイズ実装(PRML 10.2) https://shuyo.hatenablog.com/entry/20100306/variatio

    PRML 10章の変分ベイズによる混合ガウス分布推論の検証(フォロー編) - 木曜不足
  • Tsukuba.R#6お疲れ様でした - 糞ネット弁慶

    Tsukuba.R#6 - Tsukuba.R - livedoor Wiki(ウィキ) 今日の筑波は最高気温が一桁レベルと非常に寒い感じでしたが、お疲れ様でした。 僕はR+機械学習ライブラリで疎行列が扱いたかったので、そのパッケージの導入をLTで喋りました。 silideshare : とある言語の対疎行列<アンチスパースネス> 参考資料はこちら Sparse Matrices in package Matrix and applications あとロゴ画像生成はこちら。 no title

  • R でベイズ線形回帰の予測分布 - 木曜不足

    一番は「やっぱりR覚えよう……」としみじみ実感したことかもしれない(苦笑)。 というわけで R 始めました。 同じことやっても仕方ないので PRML 3.3.2 のベイズ線形回帰による予測分布をやってみることに。 とはいえ、昨日インストールして、今日 R-Tips を読みながら使い始めたという、おしりに立派な殻がついた ひよこちゃんなので、心優しい人が突っ込んでくれることを期待して、 step by step で書いてみる。 R-Tips を読んで、R とは ベクトルと行列の操作が全ての基。とても便利に使えるようになっている ベクトルとスカラーを演算すると、スカラーが自然にベクトルに拡張される。たとえば v + 3 は ベクトル v の全要素に 3 を加えたベクトルを返す スカラーを取る関数にベクトルを与えることもできる。たとえばベクトル (1,2,3) を log() に入れると、(l

  • PRML6章「ガウス過程による回帰」を R で試す - 木曜不足

    PRML 読書会 #8 が来週に迫る中。 カーネル法わからん…… ガウス過程わからん…… そもそも今回の会場無事たどり着けるかな…… 3つめの不安はとりあえず置いといて、わからんときは手を動かすしかない。 というわけで PRML 6.4.2 「ガウス過程による回帰」を R で試す。 訓練データは PRML のサンプルデータを使う。 # PRML's synthetic data set curve_fitting <- data.frame( x=c(0.000000,0.111111,0.222222,0.333333,0.444444,0.555556,0.666667,0.777778,0.888889,1.000000), t=c(0.349486,0.830839,1.007332,0.971507,0.133066,0.166823,-0.848307,-0.445686,-0

    PRML6章「ガウス過程による回帰」を R で試す - 木曜不足
  • 1