scale_fill_nejm

`scale_fill_nejm()`是ggplot2中的一个函数，它可以应用于图形中的填充颜色来模仿《New England Journal of Medicine》（NEJM）杂志的配色方案。该函数可以通过以下步骤使用：

1. 首先，确保你已经安装了`ggplot2`包。如果没有安装，可以使用以下代码进行安装：

install.packages("ggplot2")

2. 加载`ggplot2`包：

library(ggplot2)

3. 创建一个ggplot对象并设置好基本图形：

# 示例数据
df <- data.frame(
  x = c("A", "B", "C", "D"),
  y = c(2, 4, 6, 8)
)

# 创建基本图形
p <- ggplot(df, aes(x, y)) +
  geom_bar(stat = "identity")

4. 使用`scale_fill_nejm()`函数来应用NEJM配色方案：

# 应用NEJM配色方案
p + scale_fill_nejm()

以上代码将在你的图形中应用NEJM配色方案并显示结果。

请注意，为了使用`scale_fill_nejm()`函数，你需要安装并加载`scales`包，因为这个函数的实现依赖于该包。如果你还没有安装`scales`包，可以使用以下代码进行安装：

install.packages("scales")

然后加载该包：

library(scales)

这样就可以成功地使用`scale_fill_nejm()`函数来应用NEJM配色方案了。