- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我在一个循环中生成了几个条形图,它们都根据输出大小(从绘图/设备大小假设?)而不是根据条形大小调整大小。这意味着具有两个条形的图具有粗条,而具有 6 个条的图具有细条;不过,两个输出的大小相同。下面的代码表示我的脚本具有可复制的数据(我对我的做了许多其他 aes/主题更改)。
我希望输出图调整大小(在条形宽度的维度上),以便条形在不同的图形中始终具有相同的宽度,但输出图像根据(相同宽度)条形的数量改变大小。
my_factors = c("vs","cyl","carb")
for (current_factor in my_factors) {
c <- ggplot(mtcars, aes(factor(current_factor)))
c + geom_bar() + coord_flip()
ggsave(paste0(my_factors(current_factor),".png")
}
最佳答案
你可以用这个foo
功能
library(lazyeval)
library(ggplot2)
foo <- function(data,i, height_rate = 0.1){
height <- eval(substitute(length(unique(data$i))))
ld <- as.lazy_dots(list(lazy(i)))
ld <- as.lazy_dots(lapply(ld, function(x){
try(x$expr <- as.name(x$expr), silent=TRUE)
x
}))
x <- make_call(quote(aes),make_call(quote(factor),ld))
ggplot(data, eval(x$expr))+
geom_bar(width = height_rate*height)+
coord_flip()
}
foo(mtcars,"cyl")
lazyeval
包裹
foo(mtcars,cyl)
for
循环代码必须开发一点。希望能帮助到你。
关于r - 自动调整 ggplot 中条的大小以在多个图形 R 中保持均匀性,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/28956442/
我需要在半径R的圆内生成一个均匀随机点。 我意识到,通过在区间 [0 ... 2π) 中选择均匀随机的角度,并在区间 (0 ... R) 中选择均匀随机的半径,我最终会得到更多的点朝向中心,因为对于两
我想在一个正方形内生成 N 个点(均匀地)。我怎样才能做到这一点? 最佳答案 非常酷的问题,比我想象的要困难得多,但这就是想法。有关于 n 边形的论文,但我只会做正方形。因此,圆的均匀分布是一个常见问
考虑以下示例: import itertools import numpy as np a = np.arange(0,5) b = np.arange(0,3) c = np.arange(0,7)
SQL Server 将一组值分成 5 组,每组的 sum(count) 应该均匀分布。 表仅包含 2 列 rid 和 count。 create table t1(rid int, count in
我有以下简单的 HTML。 A B C 和 CSS: ul { width: 100%; display: flex; flex-direction:
我是一名优秀的程序员,十分优秀!