如何用ggplot可视化0/1数字信号？避免生成直方图

你需要的是展示随时间变化的0/1信号序列，而非直方图。利用你已经整理好的长格式数据，结合ggplot2的geom_step()可以实现类似目标图的阶梯状可视化，具体代码如下：

完整代码示例 #

# 加载依赖包
library(tidyverse)

# 生成数据
signals <- tibble(
  time = 1:20,
  long = c(rep(0,10),rep(1,10)),
  medium = c(rep(0,5),rep(1,5),rep(0,5),rep(1,5)),
  short = c(rep(0,2),rep(1,2),rep(0,2),rep(1,2),rep(0,2),rep(1,2),rep(0,2),rep(1,2),rep(0,2),rep(1,2)),
  random = c(sample(2,20,TRUE)-1)
)

# 转换为长格式
signals %<>% 
  pivot_longer(!time,names_to = "signals")

# 绘制信号图
ggplot(signals, aes(x = time, y = value, group = signals)) +
  geom_step(size = 1.2, color = "#2c3e50") + # 阶梯线匹配跳变信号
  facet_wrap(~signals, ncol = 1) + # 每个信号单独面板
  scale_y_continuous(breaks = c(0,1), limits = c(-0.1, 1.1)) + # 固定y轴刻度与范围
  labs(x = "时间", y = "信号值") +
  theme_bw() +
  theme(
    panel.grid.minor = element_blank(),
    strip.background = element_rect(fill = "#ecf0f1"),
    strip.text = element_text(size = 10, face = "bold")
  )

关键说明 #

• 避免直方图的核心是正确映射x/y轴：x对应time（时间序列），y对应value（0/1信号值），并按signals分组
• geom_step()专门用于绘制阶梯状的跳变序列，完全贴合0/1信号的突变特性
• facet_wrap()将不同信号拆分到独立面板，和目标图的布局一致

如果想要更平滑的过渡（虽然不符合离散信号特性），可以替换geom_step()为geom_line()，但阶梯线更适合展示信号的状态变化。

内容的提问来源于stack exchange，提问作者David Robie