Как построить гистограмму с использованием значений пропорций по оси Y?

Question

Я экспериментирую с ggplot упаковка в R язык. Моя задача состоит в том, чтобы построить диаграмму, показанную на рисунке из этой превосходной бумаги: http://cmup.fc.up.pt/cmup/engmat/2012/seminario/artigos2012/Luis_Ferreira/Using%20logistic%20regression%20to%20estimate%20the%20influence%20of%20accident.pdf

Можете ли вы дать мне подсказку о том, как построить это? Спасибо заранее

Answer 1

Я думаю, что это то, что вы ищете:

# Category names 
my.names <- c("test1","test2","test3") 

# Example data 
data <- runif(length(my.names)) 

# Normalize the example data as a percentage of the total 
data.norm <- data/sum(data) 

# Use barplot to plot the results, plot without an x axis 
x <- barplot(data.norm,names.arg=my.names,xaxt="n") 

# Apply new x labels rotated by 45 degrees 
text(cex=1, x=x-0.1, y=-0.05, my.names, xpd=TRUE, srt=45) 

Answer 2

Это то, что я делаю:

bp<-barplot(data.norm, beside=TRUE, col=c("grey10","grey20","grey30","grey40","grey50","grey60","grey70","grey80","grey90","grey80","grey70","grey60",))text(bp, par("usr")[3], labels=my.names, srt=45, pos=2, xpd=TRUE,offset=0.01) 

Это работает нормально для моего Надеемся, что это поможет другим С уважением