相关疑难解决方法(0)

如何制作一个很好的R可重复的例子

在与同事讨论性能,教学,发送错误报告或在邮件列表上搜索指导时,以及在Stack Overflow上,通常会询问可重复的示例并始终提供帮助.

您有什么建议创建优秀示例的提示?如何以文本格式粘贴中的数据结构?您还应该包含哪些其他信息?

在另外还有其他招数来使用dput(),dump()structure()?你什么时候应该包括library()require()声明?其中保留字应避免一个,此外c,df,data等?

怎样才能成为一位伟大的重复的例子?

r r-faq

2474
推荐指数
23
解决办法
28万
查看次数

将图例添加到具有不同类型美学的ggplot直方图中

我想在其中一个地块上添加图例,但是我有不同的审美观,并且我从未创建过图例,因此我很难确定如何构建图例。

我的审美观之一是填充代码,我将其手动添加为矢量。另一种美学是我在geom_vline中添加的垂直线。

从下面的图形中,我想添加到图例中的三个特征:1)颜色为深蓝色的条,2)颜色为浅蓝色的条,以及3)垂直线。

有人对我有建议如何有效地编码吗?

#df
df <- data.frame(Time_Diff <- runif(1000, 0, 200))


# Show median, IQR range and outliers
colors <- c(rep("blue",3), rep("paleturquoise2",38))
bp_overall <- ggplot(data = df, aes(Time_Diff)) 
bp_overall + 
  geom_histogram(binwidth = 5, fill = colors) + #create histogram
  ggtitle("Time Difference")  +
  xlab("Time in Days") +
  ylab("Amount") +
  geom_vline(xintercept = 3, linetype = "twodash", size = 1,      colour= "darkblue") + #show median
  scale_x_continuous(breaks = seq(0, 202, 10)) +
  theme_light() +
  theme(panel.grid.minor = element_blank(),
    panel.border = element_blank(), #remove all border …
Run Code Online (Sandbox Code Playgroud)

r legend histogram ggplot2 aesthetics

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

标签 统计

r ×2

aesthetics ×1

ggplot2 ×1

histogram ×1

legend ×1

r-faq ×1