ようやくデータの整形ができたので、いよいよRで解析しますよ。 file <- "readpng2r.out" df <- read.table(file) rownames(df) <- df[,1] df <- df[,-1] v <- apply(df, 1, sum) names(v) <- sapply(names(v), hexDecode.e2s) readpng2r.outは、1列目が名前…

今まで、TwitterのRSS feedをRSSモジュールで取得して使ってたんだけど、30分間隔でしか更新してくれないので何とも微妙な感じ。 はてなダイアリーガイド「モジュール一覧(1)」とは - はてなキーワード RSSを使った最新情報を表示する（rssモジュール） - は…

手元に2005年、2006年の集計データがあったので、それぞれについて月ごとの総和を比較してみました。 plot.all <- function(df1, df2, df3, ...){ palette <- c("#1E5692", "#3E9A3B", "#F9A015", "#DA2025", "#7E377E") plot(apply(df1, 2, sum), col=palet…