Как я могу показать две гистограммы в одном окне, но разные графики в R?

Question

Я хочу показать эффект удаления выбросов на моей гистограмме, поэтому я должен построить оба гистограммы вместе.

boxplot(Costs, Costs1,
    xlab=" Costs    and    Costs after  removig outliers",
    col=topo.colors(2))

, поэтому я попробовал это:

hist(Costs,Costs1,main="Histogram of  Maintenance_cost ",col="blue",
 border="darkblue",xlab="Total_cost",ylab=" ",yaxt = 'n',
 #ylim=c(0,3000),
 #xlim=c(0,max(My_Costs)),
 breaks=60)

первыйкод дает мне коробочный сюжет, но я попробовал его для истории он не работает может кто-нибудь сказать мне, как это сделать в R?

Answer 1

Для базового решения R используйте par с mfrow.

set.seed(1234)
Costs = rnorm(5000, 100, 20)
OUT = which(Costs %in% boxplot(Costs, plot=FALSE)$out)
Costs1 = Costs[-OUT]

par(mfrow=c(1,2), mar=c(5,1,2,1))
hist(Costs,main="Histogram of  Maintenance_cost ",col="blue",
 border="darkblue",xlab="Total_cost",ylab=" ",yaxt = 'n',
 breaks=60, xlim=c(30,170))
hist(Costs1,main="Maintenance_cost without outliers",col="blue",
 border="darkblue",xlab="Total_cost",ylab=" ",yaxt = 'n',
 breaks=60, xlim=c(30,170))

Answer 2

Для нескольких графиков вы должны использовать ggplot2 с facet_wrap. Вот пример:

Построение нескольких гистограмм с помощью ggplot в одном окне с несколькими переменными