2016-03-01から1ヶ月間の記事一覧

いい感じの時系列プロット

R

dygraphsパッケージのことである。 えっ、いまさらdygraphs?ナンデ?と思われる向きもあるだろうが、最近、私の記憶がやばい。 昔は記憶に雑なクエリ(例:Rでいい感じに時系列プロットかけるパッケージ)を投げても、最適な結果がスッとでてきたのが最近は無…

ggplot2でgeom_lineする時にNAを無視して線をつなぐ

R

geom_lineするとき、NAが入っているとそこで線が途切れてしまう。 library("ggplot2") smp <- data.frame(x = 1:5, y = c(1:3, NA, 5)) ggplot(smp, aes(x = x, y = y, group = 1)) + geom_line() + geom_point() あらかじめNAを除いておけば、線をつないで…

Rで自動的に画像にテロップをつける

R

昨日の続き。 これを自動でやりたい。 http://togetter.com/li/931610 ということで関数を追加した。 ついでにフォントを変更できるようにした。 下記コードでoutputという名前で画像が出力できる。 ちなみにこの画像はGoogle様がこのように判定したのであり…

[R]Rで画像にテロップをつける

こういう話がある。 http://memo.sanographix.net/post/140968243125 同じようにRでさっとテロップをつけたいのだが見つけきれなかったので作った。 こんな感じでテロップをつけられる。 # インストール install_github("dichika/caption") library(caption)…

meanとmean.defaultどちらが速いか問題

R

以下の結果でどちらが速いかちょっと考えてみてほしい。 > library("microbenchmark") > microbenchmark(mean(iris$Sepal.Length), mean.default(iris$Sepal.Length)) 結果はこちら。mean.defaultの方が速い。 Unit: microseconds expr min lq mean median u…

tweedie分布のメモ

R

tweedie分布を使ったモデリングについては以下のRevolutionsのブログや「Rで学ぶデータサイエンス10 一般化線形モデル」、twitterなどで見かけて気になっている。 http://blog.revolutionanalytics.com/2014/10/a-note-on-tweedie.html tweedie分布とは twee…