ggplot和plotnine中的自由y轴

library(ggplot2)

# 创建数据
data <- data.frame(x = 1:10, y1 = 1:10, y2 = 10:1)

# 绘制图形
ggplot(data, aes(x = x)) +
  geom_line(aes(y = y1, color = "Variable 1")) +
  geom_line(aes(y = y2 * 10, color = "Variable 2")) +
  scale_y_continuous(
    name = "Variable 1",
    sec.axis = sec_axis(~./10, name = "Variable 2")
  )

from plotnine import *

# 创建数据
data = pd.DataFrame({'x': range(1, 11), 'y1': range(1, 11), 'y2': range(10, 0, -1)})

# 绘制图形
ggplot(data) + \
  geom_line(aes(x='x', y='y1', color='Variable 1')) + \
  geom_line(aes(x='x', y='y2 * 10', color='Variable 2')) + \
  scale_y_continuous(
    name='Variable 1',
    sec_axis=sec_axis(trans=~(./10), name='Variable 2')
  )