R语言：绘制两个指标的图形 - 代码示例与解释

以下是用R语言实现两个指标画图的示例代码：

# 生成数据
x <- seq(0, 10, length.out = 100)
y1 <- sin(x)
y2 <- cos(x)

# 绘制图形
plot(x, y1, type = 'l', col = 'blue', xlab = 'x', ylab = 'y1')
lines(x, y2, col = 'red')
legend('topright', legend = c('y1', 'y2'), col = c('blue', 'red'), lty = 1)

这段代码生成了一个包含两个曲线的图形，其中y1用蓝色表示，y2用红色表示。图例显示在右上角。可以根据需要修改代码中的数据和参数来调整图形的样式。

代码解释：

• seq(0, 10, length.out = 100)：生成一个从0到10的等差数列，包含100个元素，作为x轴的坐标值。
• sin(x) 和 cos(x)：分别计算x对应角度的正弦值和余弦值，生成两个指标数据。
• plot(x, y1, type = 'l', col = 'blue', xlab = 'x', ylab = 'y1')：绘制第一条曲线，其中 type = 'l' 表示绘制线状图，col = 'blue' 设置曲线颜色为蓝色，xlab 和 ylab 设置坐标轴标签。
• lines(x, y2, col = 'red')：在已有图形上添加第二条曲线，col = 'red' 设置曲线颜色为红色。
• legend('topright', legend = c('y1', 'y2'), col = c('blue', 'red'), lty = 1)：在图形右上角添加图例，legend = c('y1', 'y2') 设置图例标签，col = c('blue', 'red') 设置图例颜色，lty = 1 设置图例线条类型。

自定义图形样式：

• 可以修改 seq() 函数的参数，调整x轴的范围和数据点数。
• 可以使用其他函数生成指标数据，例如 exp(x) 或 log(x)。
• 可以更改 plot() 和 lines() 函数中的参数，调整曲线颜色、线条类型、坐标轴标签等。
• 可以使用 title() 函数添加图形标题。
• 可以使用 par() 函数设置图形的整体参数，例如背景颜色、边框等。