scale_fill_hue(name='regions',labels= as.character(unique(w[,5])) )
ラベルの使用順序はscale で明示すること。これがないとalphabeticalにソートされてしまう。
上記だけをやると列名とラベルが不整合を起こすので、列名にも数字を先頭に付加してソート順序を制御しなくてはならない。
for(i in seq(1,47,1)){ colnames(mdf)[i] <- (paste(sprintf("%02d",i),colnames(mdf)[i],sep=""))}
reshape2はもう使えない。したがってmelt() も使えない。
melt(data=mdf, id.vars="t", measure.vars=as.character(unique(w[,5]))) は
df.melt <- mdf %>% tidyr::gather(variable,value,as.character(colnames(mdf)[-48]))
になる。
以下をインストールしておくこと。
- tidyr Tidy Messy Data
- dplyr A Grammar of Data Manipulation
unloadするときは。
detach("package:dplyr", unload=TRUE)
detach("package:tidyr", unload=TRUE)
detach("package:tidyr", unload=TRUE)
