Какие альтернативы барплоту?

Question

У меня есть следующий набор данных, который состоит из нескольких аспектов оценки для определенного агента к 2014 и 2015 соответственно:

mydata<-data.frame(X2014 = c(200,1500,14, 1499), X2015 = c(100,1657,16, 1234)) 

Я пытаюсь создать сравнительный график, который помогает увидеть, если 2015 год в целом лучше или худший год по сравнению с 2014 годом и по каким аспектам (переменным). Я уже пробовал использовать простой barplot за каждый год (давать или принимать несколько корректировок, чтобы сделать его хорошо выглядеть):

barplot(as.matrix(mydata)) 

Однако, мне было интересно, если есть альтернатива, чтобы помочь визуализировать набор данных такого рода , Помощь будет воспринята.

Answer 1

Ваш вопрос остается неясным (с решающим детали появляются только в комментариях), но что-то подобное может быть то, что вы хотите

mydata <- data.frame(X2014 = c(200,1500,14, 1499), 
        X2015 = c(100,1657,16, 1234), 
        what = c("Income", "Costs", "Sales", "Losses")) 

library(tidyr) 
mydata_long <- gather(mydata, year, value, X2014:X2015) 

library(ggplot2) 
ggplot(mydata_long, aes(year, value, colour = what)) + 
    geom_point(size = 5) + 
    geom_line(aes(group = what)) + 
    theme_bw() 

Возможно, это более уместно, в случае с единицы измерения различны для каждой переменной:

ggplot(mydata_long, aes(year, value, colour = what)) + 
    geom_point(size = 5) + 
    geom_line(aes(group = what)) + 
    facet_wrap(~what, scales = 'free') + 
    theme_bw() 

Мы можем поставить участки в стопке так год по сравнению год легче увидеть:

ggplot(mydata_long, aes(year, value, colour = what)) + 
    geom_point(size = 5) + 
    geom_line(aes(group = what)) + 
    facet_wrap(~what, scales = 'free', ncol = 1) + 
    theme_bw()