我只想删除图表的顶部。我在这里和这里找到了一些方向。但是,它们会删除所有边框或顶部和左侧。我知道我可能应该将参数panel.border与element_blank()or一起使用,element_rect()但我找不到定义它的正确方法。
我在找这个:
library(tidyverse)
mtcars %>%
ggplot(aes(factor(cyl), disp)) +
geom_boxplot() +
jtools::theme_apa() +
theme(
panel.border = element_blank())
Run Code Online (Sandbox Code Playgroud)
将导致:
我创建了一个图表,ggplot里面有两个变量facet_grid。
我希望每个方面的标题仅在该方面的中心重复一次。
例如,第一个原始(上面)中的 0 和 1 将只出现一次并且出现在中间。
在我原来的情节中,每个方面的情节数量不相等。因此,使用两个地块拼凑patchwork/ cowplot/ggpubr不能很好地工作。
我更喜欢只使用ggplot.
样本数据:
df <- head(mtcars, 5)
Run Code Online (Sandbox Code Playgroud)
示例图:
df %>%
ggplot(aes(gear, disp)) +
geom_bar(stat = "identity") +
facet_grid(~am + carb,
space = "free_x",
scales = "free_x") +
ggplot2::theme(
panel.spacing.x = unit(0,"cm"),
axis.ticks.length=unit(.25, "cm"),
strip.placement = "outside",
legend.position = "top",
legend.justification = "center",
legend.direction = "horizontal",
legend.key.size = ggplot2::unit(1.5, "lines"),
# switch off the rectangle around symbols
legend.key = ggplot2::element_blank(),
legend.key.width = …Run Code Online (Sandbox Code Playgroud) 我确信有一个简单的解决方案,但我环顾四周却找不到任何东西。
本质上,我只想y-axis水平翻转标题,然后将其沿y-axis. 我已经设法翻转它,但我似乎找不到将其沿轴居中的参数。
这是一个可重现的示例:
require(tidyverse)
iris %>% ggplot() + geom_point(aes(x = Sepal.Length, y = Sepal.Width)) +
theme(axis.title.y = element_text(angle=0))
Run Code Online (Sandbox Code Playgroud)
先谢谢了!
我发现自己最近不得不RStudio在多台计算机上安装。
虽然发现可以迁移/重新安装软件包,但找不到用于迁移用户首global options选项(例如及其子选项(外观,窗格布局等))的方式/脚本/软件包。
我发现可以rstudioapi用来更改主题(link)。但是,还有其他global options我不知道如何导出的内容(例如,窗格布局,字体)。
I am looking for a readable alternative to plyr::mapvalues in data.table.
例如,在中plyr::mapvalues,如果我想将carbin 的值更改mtcars为type1, type2, type3,则可以执行以下操作:
library(tidyverse)
mtcars %>%
mutate(carb = plyr::mapvalues(
carb,
from = c("1", "2", "3", "4", "6", "8"),
to = c("type1", "type1", "type2", "type2", "type3", "type3")))
Run Code Online (Sandbox Code Playgroud)
为了获得相同的效果data.table,我会这样做,但这似乎不是常规方法:
library(data.table)
dt <- data.table(mtcars)
dt$carb <- as.character(dt$carb)
dt[which(carb %in% c("1", "2")),
carb := "type1"]
dt[which(carb %in% c("3", "4")),
carb := "type2"]
dt[which(carb %in% c("6", "8")),
carb := "type3"]
Run Code Online (Sandbox Code Playgroud)
是否可以在一个条件(dt[...] …
例如,我已经看过“在ggplot2条形图中订购酒吧”和“如何在分组的条形图[重复]中重新排列组”。但是我一直无法适应那些问题。
我正在尝试制作一个非常基本的直方图,条形图是每个类中的模型数量,并按该数字排序:
library(ggplot2)
mpg %>%
ggplot +
geom_bar(mapping = aes(
x = reorder(class, count)
))
Run Code Online (Sandbox Code Playgroud)
我可以使无序版本起作用:
mpg %>%
ggplot +
geom_bar(mapping = aes(
x = class
))
Run Code Online (Sandbox Code Playgroud)
有人可以帮忙吗?我究竟做错了什么?有没有一种方法可以按数量排序该因子?
r ×7
ggplot2 ×5
data.table ×1
dataframe ×1
dplyr ×1
facet-grid ×1
ide ×1
plyr ×1
rstudio ×1
settings ×1