2015-08-11 1 views
0

Я пытаюсь проанализировать самые дорогие наименее предписанные предметы. Существует таблица с названием Prescription2014, которая содержит 21 набор химических групп, идентификатор группы, количество выданных предметов и стоимость NET.Как заказать ось y в соответствии со значением в программе R?

В столбце «Стоимости NET», когда я пытался отфильтровать его в соответствии со значением, он всегда сортирует в алфавитном порядке 1, 2, 3, 4 формат. Например. она перебирает как 10, 200, 3, 44, однако оно должно быть 3, 10, 44, 200.

код, который я использую

library(ggplot2) 
cc <- ggplot(prescription2014, aes(x = reorder(as.numeric(Prescription.ID), 
     Prescription.items.dispenses.thousands.), 
     y = as.character(Net.ingredient.cost.thousands.), 
     fill = Prescription.items.dispenses.thousands.)) + geom_bar(stat = "identity") 
cc 

Здесь я поставил Net. component.cost.thousands как символ, потому что я хочу показать стоимость денег на графике, чтобы зритель мог ясно видеть стоимость предметов.

Спасибо

enter image description here

ответ

0

Попробуйте сделать ваш пример воспроизводимым с помощью некоторых общих данных или подмножество вашего prescription2014 объекта.

Кажется, что ваша переменная сортировки может быть символом, когда она должна быть числовой, но мы не можем сказать из вашего кода. Попробуйте преобразовать переменную в числовую, используя as.numeric(your_variable).

+0

Значит, вы имеете в виду вот это? x <- as.numeric (prescription2014 $ Prescription.ID) y <- as.numeric (prescription2014 $ Net.ingredient.cost.thousands.) cc <- ggplot (prescription2014, aes (x = reorder (x, Prescription) .items.dispenses.thousands.), y = y, fill = Prescription.items.dispenses.thousands.)) + geom_bar (stat = "identity") Он дает мне тот же график после этого изменения –

+0

Подробнее о том, как чтобы сделать воспроизводимый пример, см. [этот пост] (http://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-example). Вы захотите использовать 'dput' для предоставления своих данных. В противном случае невозможно устранить проблему. – Bryan