科研绘图工具R语言

前言：

一、下载软件

二、简单绘图

前言：

有的时候需要绘制复杂图形，但是你其实自己也不知道究竟有哪些可以绘制的图，除了散点图，折线图等等，下面就是有一个网站，上面有很多图形，之后也有对应的代码，可以供你选择。

https://www.data-to-viz.com/

一、下载软件

主要需要下载三个软件，第一个是R语言的解释器，第二个是R语言的图形化开发环境，第三个是编译器。

R语言解释器：Index of /bin/windows/base/old/4.4.1

R语言图形化开发环境：RStudio Desktop - Posit

编译器：Rtools44 for Windows

R 的一个事实（很关键）

R 包 ≠ 全是 R 代码

很多包内部包含：

C

C++

Fortran

（为了速度，比如数值计算、优化、图形渲染）

但在 Windows：

❌ 默认 没有编译环境

👉 Rtools 就是给 Windows 补上这套"编译工具链"

比如有些包需要从github下载，就必须编译，就需要用这个 remotes::install_github("xxx/xxx")

但是一般的包安装install.packages("tidyverse")，不需要

验证是否Rtools下载成功

Sys.which("make")

二、简单绘图

R 复制代码

# Libraries
library(tidyverse)
library(viridis)

# create a dataset
data <- data.frame(
  name=c(rep("A",500), rep("B",500), rep("B",500), rep("C",20), rep("D", 100)),
  value=c(rnorm(500, 10, 5), rnorm(500, 13, 1), rnorm(500, 18, 1), rnorm(20, 25, 4), rnorm(100, 12, 1))
)

# Plot
p <- data %>%
  ggplot(aes(x=name, y=value, fill=name)) +
  geom_boxplot(outlier.shape = NA) +
  geom_jitter(color="black", size=0.4, alpha=0.6, width=0.2) +
  scale_fill_viridis(discrete = TRUE, alpha=0.6) +
  theme_minimal(base_size = 13) +
  theme(
    legend.position="none",
    plot.title = element_text(size=11)
  ) +
  ggtitle("A boxplot with jitter") +
  xlab("")

print(p)   # ✅ 这一行确保画出来（脚本/块运行时尤其需要）

之后CTRL+A，全选点运行