Я намагаюся змінити розмір сюжету, щоб він містився у моєму документі, але у мене виникають труднощі з отриманням побудованої діаграми як квадрата.
Приклад:
pdf(file = "./out.pdf", width = 5, height = 5)
p <- ggplot(mydata, aes(x = col1, y = col2))
print(p)
aux <- dev.off()
Хоча обмеження для x та y однакові, графік результату не є квадратним. Я припускаю, що R робить панель, що охоплює 5x5 ", але не хвилює фактичний розмір діаграми.
Як я можу зіпсувати свої схеми?
Відповіді:
У ggplotмеханізмі збереження пропорції вашого сюжету є додавання coord_fixed()шару до сюжету. Це збереже співвідношення сторін самого сюжету незалежно від форми фактичного обмежувального вікна.
(Я також пропоную вам використовувати, ggsaveщоб зберегти отриманий графік у pdf / png / etc, а не в pdf(); print(p); dev.off()послідовність.)
library(ggplot2)
df <- data.frame(
x = runif(100, 0, 5),
y = runif(100, 0, 5))
ggplot(df, aes(x=x, y=y)) + geom_point() + coord_fixed()
hjustположення заголовка - спробуйте opts(axis.title.y=theme_text(hjust=10)). Але, на жаль, здається, ні. Див groups.google.com/group/ggplot2/browse_thread/thread / ... для ggplot розсилки списку обговорення і @ відповідь Батист в.
y=runif(100, 0, 50)тоді аспект ділянки більше не квадратний. coord_fixed()змушує масштаб кожної осі бути рівним лише здається?
Щоб забезпечити певне співвідношення сторін, наприклад, для квадрата, використовуйте theme(aspect.ratio=1).
Відповідь Андрі не дає повної картини, оскільки приклад надає, можливо, неприродні дані, де діапазон x дорівнює діапазону y. Якщо ж дані були:
df <- data.frame(
x = runif(100, 0, 50),
y = runif(100, 0, 5))
ggplot(df, aes(x=x, y=y)) + geom_point() + coord_fixed()
тоді сюжет буде виглядати так:
Функціяordord_fixed () також має аргумент для регулювання співвідношення осей:
ratioспіввідношення сторін, виражене як у / х
Щоб сюжет можна було зробити квадратним за допомогою:
ggplot(df, aes(x=x, y=y)) + geom_point() + coord_fixed(ratio=10)
Але вам потрібно скоригувати це з урахуванням меж змінних чи площі ділянки (не всі межі красиво діляться на цілі числа, як у цих прикладах).
Для повноти: Якщо ви хочете взяти до уваги дуже різні межі осей:
df <- data.frame(
x = runif(100, 0, 5000),
y = runif(100, 0, 5))
ratio.display <- 4/3
ratio.values <- (max(df$x)-min(df$x))/(max(df$y)-min(df$y))
plot <- ggplot(df, aes(x=x, y=y)) + geom_point()
plot + coord_fixed(ratio.values / ratio.display)
В результаті:
plot + theme(aspect.ratio=4/3)? Ggplot може мати декілька шарів з безліччю наборів даних, а осі можуть мати довільні коефіцієнти розширення, тому обчислення співвідношення у / х з одного джерела даних здається досить крихким.