再配置軸ラベル

Question

私は、次のデータフレームを持っている：

structure(list(Var1 = structure(1:7, .Label = c("Friday", "Monday", 
"Saturday", "Sunday", "Thursday", "Tuesday", "Wednesday"), class = "factor"), 
    Freq = c(20938L, 43147L, 35027L, 24087L, 7148L, 6310L, 19027L 
    )), .Names = c("Var1", "Freq"), row.names = c(NA, -7L), class = "data.frame") 

それは次のようになります。

 Var1 Freq 
1 Friday 20938 
2 Monday 43147 
3 Saturday 35027 
4 Sunday 24087 
5 Thursday 7148 
6 Tuesday 6310 
7 Wednesday 19027 

私はplotlyライブラリを使用して、それをプロットするとき、x軸は、水曜日から始まります金曜日までずっと進んでいます。しかし、私は日曜日から土曜日までラベルを並べ替えたい。

上で与えられたデータを持つデータフレームを「T」をされたと仮定すると：私は、次のコードを使用

target <- c("Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday") 
a <- t[match(target, t$Dayoftheweek), ] 
plot_ly(a, x = Dayoftheweek, y = Freq, type = "bar", color = Dayoftheweek) 

これは動作しません。私はnullにrownamesをリセットしても、同じ問題が発生します。

Answer 1

代替手段はggplot2です。あなたは試すことができます：

t <- factor(t$Var1, levels = c("Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday")) 
ggplot(data=t, aes(x=Var1, y=Freq, fill=Var1)) + geom_bar(stat='identity') + theme_bw() 
ggplotly()