изменение положения заголовков

Question

Я пытаюсь рисовать круговые диаграммы, используя R со следующим кодом. Заголовки далеки от круговых диаграмм. Я хотел бы получить круговые диаграммы чуть ниже заголовков. Как я могу это сделать?

x <- c(632,20,491,991,20) 
y <- c(37376,41770,5210,5005,3947) 
names <- c("alpha","beta","gamma","delta","omega") 
par(mfrow=c(1,2)) 
pie(x, names, col = c("red", "yellow", "blue", "green", "cyan"), main="PIE CHART 1") 
pie(y, names,col = c("red", "yellow", "blue", "green", "cyan"), main="PIE CHART 2") 

Answer 1

x <- c(632,20,491,991,20) 
y <- c(37376,41770,5210,5005,3947) 
names <- c("alpha","beta","gamma","delta","omega") 
par(fig=c(0,0.5,0,1)) 
pie(x, names, col = c("red", "yellow", "blue", "green", "cyan")) 
title("CHART 1", line=-3) 
par(fig=c(0.5,1,0,1),new=TRUE) 
pie(y, names,col = c("red", "yellow", "blue", "green", "cyan")) 
title("CHART 2", line=-3) 

Переоборудование:

• Par - контроль изменений до фига = с (х, х, у, у), чтобы указать, что вы хотите, чтобы каждый участок, чтобы занять часть окна так как на данный момент у меня есть каждая круговая диаграмма, занимающая половину окна графика.
• Par new = TRUE утверждает, что вы хотите, чтобы второй график «наложился»
• Заголовок - отдельно от графика, строка = x состояний где вам нужно название t о сидеть, играть с различными - цифры, пока вы не получите то, что вы хотите

---

В качестве альтернативы, вы можете также продолжать использовать mfrow:

par(mfrow=c(1,2)) 
pie(x, names, col = c("red", "yellow", "blue", "green", "cyan")) 
title("PIE CHART 1", line=-1) 
pie(y, names, col = c("red", "yellow", "blue", "green", "cyan")) 
title("PIE CHART 2", line=-1)