如何在R中绘制按列索引排序的多行分段折线图？

核心需求回顾 #

• 每行数据对应一条折线，每条线含4个点
• X轴为该行的浮点数值，保留原始顺序不排序
• Y轴为列索引，按[0,1,2,3]顺序绘制折线与显示刻度

修正后的Matplotlib实现 #

如果你的data是Pandas DataFrame，注意直接用data[i]会提取列而非行，必须用iloc[i]获取行数据。以下是可直接运行的代码：

import matplotlib.pyplot as plt
import pandas as pd

# 替换成你的数据框
data = pd.DataFrame([
    [1.2, 3.5, 2.1, 4.3],
    [2.0, 1.8, 3.2, 0.9],
    [0.5, 4.0, 1.5, 3.0]
])

plt.figure(figsize=(8, 6))
for row_idx in range(data.shape[0]):
    # 获取当前行的原始数值序列
    row_vals = data.iloc[row_idx].values
    # 按列索引顺序绘制折线（Y轴对应0-3）
    plt.plot(row_vals, [0, 1, 2, 3], '*-', label=f'Row {row_idx+1}')

# 强制Y轴刻度顺序为0-3，避免自动调整
plt.yticks([0, 1, 2, 3], ['Column 0', 'Column 1', 'Column 2', 'Column 3'])
plt.xlabel('Data Values')
plt.ylabel('Column Index')
plt.title('Segmented Line Plots by Row')
plt.legend()
plt.grid(alpha=0.3)
plt.show()

关键细节 #

• data.iloc[row_idx].values保证获取的是该行数据的原始顺序，不会触发X轴排序
• plt.plot(row_vals, [0,1,2,3])直接按列索引0→1→2→3的顺序连接点，满足折线绘制顺序要求
• plt.yticks明确指定Y轴刻度，确保显示顺序与列索引完全一致

可选：Plotnine（Python版ggplot）实现 #

如果偏好ggplot语法，需要先将宽格式数据转为长格式，再按行分组绘制：

from plotnine import ggplot, aes, geom_line, geom_point, labs, scale_y_continuous
import pandas as pd

# 转换为长格式：每行数据拆分为4行，标记行索引与列索引
long_df = data.reset_index().melt(
    id_vars='index', 
    var_name='column_index', 
    value_name='data_value'
)
long_df['column_index'] = long_df['column_index'].astype(int)

(ggplot(long_df, aes(x='data_value', y='column_index', group='index'))
 + geom_line(color='#1f77b4')
 + geom_point(shape='*', size=5, color='#ff7f0e')
 + scale_y_continuous(breaks=[0,1,2,3])  # 强制Y轴刻度顺序
 + labs(x='Data Values', y='Column Index', title='Segmented Line Plots by Row')
)

内容的提问来源于stack exchange，提问作者Aleksejs Fomins