如何在R Plotly饼图和折线图中相应地将数字格式设置为K或M

library(plotly)

# 创建示例数据集
data <- data.frame(
  category = c("A", "B", "C", "D"),
  value = c(1000, 2000000, 3000000000, 4000000000000)
)

# 创建饼图
pie_chart <- plot_ly(data, labels = ~category, values = ~value, type = "pie")

# 设置数字格式为K或M
pie_chart <- layout(pie_chart, yaxis = list(tickformat = ".2s"))

# 创建折线图
line_chart <- plot_ly(data, x = ~category, y = ~value, type = "scatter", mode = "lines")

# 设置数字格式为K或M
line_chart <- layout(line_chart, yaxis = list(tickformat = ".2s"))

library(plotly)

# 创建示例数据集
data <- data.frame(
  category = c("A", "B", "C", "D"),
  value = c(1000, 2000000, 3000000000, 4000000000000)
)

# 创建饼图并设置数字格式
pie_chart <- plot_ly(data, labels = ~category, values = ~value, type = "pie")
pie_chart <- layout(pie_chart, yaxis = list(tickformat = ".2s"))

# 创建折线图并设置数字格式
line_chart <- plot_ly(data, x = ~category, y = ~value, type = "scatter", mode = "lines")
line_chart <- layout(line_chart, yaxis = list(tickformat = ".2s"))

# 显示图表
subplot(pie_chart, line_chart)