相关疑难解决方法(0)

我有以下使用ggplot2生成的图表

我有finalPlotggplot对象.添加我使用的标签

finalPlot + stat_bin() + scale_x_continuous('Solution Cost') + scale_y_continuous('Number of Solutions')`

如何更改y轴标签的方向以使其显示为水平,如果可能,则跨越两条线

Number of
Solutions

我想将一个完整的ggplot对象旋转90°.

我不想使用,coord_flip因为这似乎干扰scale="free"和space="free"使用facet时.

例如:

qplot(as.factor(mpg), wt, data=mtcars)+
facet_grid(.~vs + am, scale="free",space="free")

VS

qplot(as.factor(mpg), wt, data=mtcars)+
  facet_grid(vs + am ~ ., scale="free",space="free")+
  coord_flip()

我想要的是什么:

我可能需要使用gridExtra.

类似于ggplot2：如何以特定角度旋转图形？，但我不希望图像/正方形旋转，我希望在框架内旋转数据。

例如，如果我从这个开始：

library(ggplot2)
usa <- maps::map('usa', plot=FALSE)

ggplot(as.data.frame(usa[c("x","y")]), aes(x,y)) +
  coord_quickmap() +
  geom_path()

我希望能够生成这个：

• 旋转需要保留空间数据的纵横比
• 我需要支持任意旋转，不受 90 度跳跃的限制
• 我想是否可以保留实际的网格（以保留其中的默认行为ggplot2），但如果不能，我可以手动生成它们
• 我希望通用图的封闭矩形保持不变，包括（此处未显示）标题和副标题
• 如果坐标系不变，我会喜欢它，这意味着我可以添加其他图层，这些图层随后会自动欣赏旋转。@qdread 的回答给出了替代方案，其中单个函数可以计算旋转（尽管我不知道如何使用空间数据在数学上做到这一点）
• 请忽略：
  • 左上角的网格问题，我的photoshopping不完整
  • x 轴标签，数字错误（y 轴很好）（可以删除，不需要）

我想知道这是否可以通过CRS/projections来完成，但我对它们不够聪明，无法正式/正确地使用它。