изменить внешний вид сюжета, чтобы он напоминал историю - PullRequest
Новая
       14

изменить внешний вид сюжета, чтобы он напоминал историю

1 голос
/ 21 января 2010

Я использовал информацию из этого поста для создания гистограммы с логарифмической шкалой: Гистограмма с логарифмической шкалой

Однако вывод из сюжета не похож на вывод из исторических данных. Кто-нибудь знает, как настроить вывод из сюжета так, чтобы он напоминал вывод из ист? Спасибо за помощь.

Ответы [ 2 ]

2 голосов
/ 21 января 2010

Упрощенная, воспроизводимая версия связанного ответа: 

x <- rlnorm(1000)
hx <- hist(x, plot=FALSE)
plot(hx$counts, type="h", log="y", lwd=10, lend="square")

Чтобы оси выглядели более "похожими на историю", замените последнюю строку на 

plot(hx$counts, type="h", log="y", lwd=10, lend="square", axes = FALSE)
Axis(side=1)
Axis(side=2)

Использование этого метода станет кошмаром. Я предлагаю использовать метод проб и ошибок со значениями lwd (в этом примере значение 34 близко к правильному взгляду) или учиться использовать lattice или ggplot.

EDIT: Вы не можете установить цвет границы, потому что столбцы на самом деле не прямоугольники & ndash; они просто жирные линии. Мы можем подделать эффект границы, нарисовав немного более тонкие линии поверх. Обновленный код 

par(lend="square")
bordercol <- "blue"
fillcol <- "pink"
linewidth <- 24
plot(hx$counts, type="h", log="y", lwd=linewidth, col=bordercol, axes = FALSE)
lines(hx$counts, type="h", lwd=linewidth-2, col=fillcol)
Axis(side=1)
Axis(side=2)
1 голос
/ 21 января 2010

Как насчет использования ggplot2? 

x <- rnorm(1000)
qplot(x) + scale_y_log10()

Но я согласен с комментарием Хэдли к другому посту о том, что гистограмма с масштабом журнала мне кажется странной =).

...