如何用ggplot制作三维数组的箱形图？

library(plotly)

# 生成示例数据
data <- array(rnorm(1000), dim = c(10, 10, 10))

# 将三维数组转换为长格式数据
df <- reshape2::melt(data)

# 绘制箱形图
plot_ly(df, x = ~Var1, y = ~value, z = ~Var2, type = "box") %>%
  layout(scene = list(xaxis = list(title = "Var1"),
                      yaxis = list(title = "Value"),
                      zaxis = list(title = "Var2")))

import numpy as np
import pandas as pd
import matplotlib.pyplot as plt

# 生成示例数据
data = np.random.randn(10, 10, 10)

# 将三维数组转换为DataFrame
df = pd.DataFrame(data.reshape(-1, 10), columns=["Var1", "Var2", "Value"])

# 绘制箱形图
fig = plt.figure()
ax = fig.add_subplot(111, projection='3d')
ax.boxplot(df["Value"], positions=[(i, j) for i in range(10) for j in range(10)])
ax.set_xlabel("Var1")
ax.set_ylabel("Var2")
ax.set_zlabel("Value")
plt.show()