小编DJV*_*DJV的帖子

ggplot2 - 删除面板顶部边框

我只想删除图表的顶部。我在这里这里找到了一些方向。但是,它们会删除所有边框或顶部和左侧。我知道我可能应该将参数panel.borderelement_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)

将导致:

在此处输入图片说明

r ggplot2

5
推荐指数
2
解决办法
1220
查看次数

ggplot - 集中 facet_grid 标题并且只出现一次

我创建了一个图表,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)

r ggplot2 facet-grid

4
推荐指数
1
解决办法
392
查看次数

ggplot2中心y轴标题

我确信有一个简单的解决方案,但我环顾四周却找不到任何东西。

本质上,我只想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)

先谢谢了!

r ggplot2

3
推荐指数
1
解决办法
4642
查看次数

导出/导入RStudio用户首选项,全局设置等

我发现自己最近不得不RStudio在多台计算机上安装。

虽然发现可以迁移/重新安装软件包,但找不到用于迁移用户首global options选项(例如及其子选项(外观,窗格布局等))的方式/脚本/软件包。

我试图在这里这里这里看,但是找不到答案。

编辑

我发现可以rstudioapi用来更改主题(link)。但是,还有其他global options我不知道如何导出的内容(例如,窗格布局,字体)。

ide settings r rstudio

2
推荐指数
1
解决办法
189
查看次数

使用 ggplot 更改图中 stat_compare_means() 的位置

我有这个 ggplot 图,其ggpubr::stat_compare_means()功能如下: 在此输入图像描述

正如您所看到的,Wilcoxon 测试与左侧条上的一些点重叠。

如何将文本移到右侧?

r ggplot2

1
推荐指数
1
解决办法
2万
查看次数

Alternative to plyr::mapvalues in data.table

I am looking for a readable alternative to plyr::mapvalues in data.table.

例如,在中plyr::mapvalues,如果我想将carbin 的值更改mtcarstype1, 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[...] …

r plyr dataframe dplyr data.table

1
推荐指数
2
解决办法
89
查看次数

如何订购直方图中的条形图?

例如,我已经看过“在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 ggplot2

0
推荐指数
1
解决办法
52
查看次数

标签 统计

r ×7

ggplot2 ×5

data.table ×1

dataframe ×1

dplyr ×1

facet-grid ×1

ide ×1

plyr ×1

rstudio ×1

settings ×1