ggplot2 / plotnine:如何为熔化的df绘制分组图表？

library(ggplot2)
library(reshape2)

# 创建一个示例数据框
df <- data.frame(
  Group = c("A", "A", "B", "B"),
  Variable = c("X", "Y", "X", "Y"),
  Value = c(1, 2, 3, 4)
)

# 熔化数据框
melted_df <- melt(df, id.vars = c("Group", "Variable"))

# 绘制分组图表
ggplot(melted_df, aes(x = Group, y = value, fill = Variable)) +
  geom_bar(stat = "identity", position = "dodge")

from plotnine import *
import pandas as pd

# 创建一个示例数据框
df = pd.DataFrame({
  "Group": ["A", "A", "B", "B"],
  "Variable": ["X", "Y", "X", "Y"],
  "Value": [1, 2, 3, 4]
})

# 熔化数据框
melted_df = pd.melt(df, id_vars = ["Group", "Variable"])

# 绘制分组图表
(ggplot(melted_df)
  + aes(x = "Group", y = "value", fill = "Variable")
  + geom_bar(stat = "identity", position = "dodge"))