在R中，我们可以使用以下代码示例来解决“不同距离度量下的单位球（2D）”的问题：

# 安装和加载所需的包
install.packages("ggplot2")
library(ggplot2)

# 生成2D单位球的数据
n_points <- 1000
theta <- runif(n_points, 0, 2*pi)
radius <- sqrt(runif(n_points))
x <- radius * cos(theta)
y <- radius * sin(theta)
data <- data.frame(x = x, y = y)

# 欧几里德距离度量
ggplot(data, aes(x = x, y = y)) +
  geom_point() +
  coord_equal() +
  theme_minimal()

# 曼哈顿距离度量
ggplot(data, aes(x = x, y = y)) +
  geom_point() +
  coord_equal() +
  theme_minimal() +
  theme(panel.grid = element_blank()) +
  theme(panel.border = element_blank()) +
  theme(axis.ticks = element_blank()) +
  theme(axis.text = element_blank()) +
  theme(axis.title = element_blank())

# 切比雪夫距离度量
ggplot(data, aes(x = x, y = y)) +
  geom_point() +
  coord_equal() +
  theme_minimal() +
  theme(panel.grid = element_blank()) +
  theme(panel.border = element_blank()) +
  theme(axis.ticks = element_blank()) +
  theme(axis.text = element_blank()) +
  theme(axis.title = element_blank()) +
  xlim(-1, 1) +
  ylim(-1, 1)

上述代码中，我们首先通过生成随机的极坐标角度和半径来生成2D单位球的数据。然后，我们使用ggplot2包将数据绘制为散点图，并使用不同的坐标系和主题来表示不同的距离度量。

在欧几里德距离度量示例中，我们使用默认的坐标系和主题来绘制单位球的散点图。

在曼哈顿距离度量示例中，我们使用空白的网格、边框、刻度线、文本和标题来创建一个简洁的图形，以便更好地展示曼哈顿距离下的单位球。

在切比雪夫距离度量示例中，我们进一步限制x轴和y轴的范围为[-1, 1]，以便更好地展示切比雪夫距离下的单位球。