перестановка меток осей в Plotly R

У меня есть следующий фрейм данных:

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)

Это не работает. Я сбросил rownames на null, но возникла та же проблема.


r plotly
person Apricot    schedule 15.04.2016    source источник

Ответы (1)


arrow_upward
0
arrow_downward

Альтернативой может быть 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()

введите описание изображения здесь

person MLavoie    schedule 15.04.2016
comment
Я пробовал это раньше ... но я получал ошибку Ошибка в gg2list (p): объект 'nann' не найден. Но когда я перезапустил сеанс R, все заработало. Не могу понять .... спасибо, однако. Я получил это подтверждение. - person Apricot; 15.04.2016